4 use Test::More tests => 3;
15 handles => { 'invoke_callback' => 'execute' },
23 handles => { 'multiply' => 'execute' },
28 my $thingy = Thingy->new(
29 callback => sub { ++$i },
30 multiplier => sub { $_[0] * 2 }
34 $thingy->invoke_callback;
36 is($thingy->multiply(3), 6);