NAME
    Test::Stub - Stub! Stub! Stub!

SYNOPSIS
        use Test::Stub;

        # DSL style
        my $agent = LWP::UserAgent->new();
        stub($agent)->get(HTTP::Response->new(200, "OK"));
        is($agent->get('http://www.aiseikai.or.jp/')->code, 200);

        # simple style
        my $agent = LWP::UserAgent->new();
        make_stub($agent, 'get', HTTP::Response->new(200, "OK"));
        is($agent->get('http://www.aiseikai.or.jp/')->code, 200);

DESCRIPTION
    Test::Stub is a simple stubbing library for Perl5.

EXPORTABLE FUNCTIONS
    stub($stuff) : Test::Stub::Driver
        Create a new instance of Test::Stub::Driver.

    make_stub($object, $method, $stub) : Undef
        Make monadic class from blessed($object) and add a $method with
        $stub.

Test::Stub::Driver
    This class only provides a AUTOLOAD method.

    AUTOLOAD method rebless the $stuff to anonymous class.

    For example. After calling following code:

        stub($stuff)->foo('bar');

    "$stuff->foo()" returns 'bar'.

AUTHOR
    Tokuhiro Matsuno <tokuhirom AAJKLFJEF@ GMAIL COM>

SEE ALSO
    The interface was taken from Test::Double.

LICENSE
    Copyright (C) Tokuhiro Matsuno

    This library is free software; you can redistribute it and/or modify it
    under the same terms as Perl itself.