Mock::Quick::Object

NAME

Mock::Quick::Object − Object mocking for Mock::Quick

DESCRIPTION

Provides object mocking. See Mock::Quick for a better interface.

SYNOPSIS

    use Mock::Quick::Object;
    use Mock::Quick::Method;
    my $obj = Mock::Quick::Object−>new(
        foo => 'bar',            # define attribute
        do_it => qmeth { ... },  # define method
        ...
    );
    is( $obj−>foo, 'bar' );
    $obj−>foo( 'baz' );
    is( $obj−>foo, 'baz' );
    $obj−>do_it();
    # define the new attribute automatically
    $obj−>bar( 'xxx' );
    # define a new method on the fly
    $obj−>baz( Mock::Quick::Method−>new( sub { ... });
    # remove an attribute or method
    $obj−>baz( \$Mock::Quick::Util::CLEAR );

AUTHORS

Chad Granum exodist7 AT gmail DOT com

COPYRIGHT

Copyright (C) 2011 Chad Granum

Mock-Quick is free software; Standard perl licence.

Mock-Quick is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY ; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the license for more details.