NAME

       Mock::Quick::Object::Control - Control a mocked object after creation

DESCRIPTION

       Control a mocked object after creation.

SYNOPSIS

           my $obj = Mock::Quick::Object->new( ... );
           my $control = Mock::Quick::Object::Control->new( $obj );

           $control->set_methods( foo => sub { 'foo' });
           $control->set_attributes( bar => 'baz' );

           # Make an attribute exist so that it can be used for get/set operations.
           $control->set_attributes( empty => undef );

METHODS

       $control = $CLASS->new( $obj )
       $control->set_methods( name => sub { ... }, ... )
           Set/Create methods

       $control->set_attributes( name => $val, ... )
           Set/Create attributes (simple get/set accessors)

       $control->clear( $name1, $name2, ... )
           Remove attributes/methods.

       $control->strict( $BOOL )
           Enable/Disable strict mode.

       $data = $control->metrics()
           Returns a hash where keys are method names, and values are the number of times the
           method has been called. When a method is altered or removed the key is deleted.

AUTHORS

       Chad Granum exodist7@gmail.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.