Lines Matching refs:target
30 my($target, $args, $truth) = @_;
34 $target->aside(
36 ) if $target->can('aside');
54 if( $target->can($method) ) { # it's argumental
64 $target->$method( $rest );
69 if( $target->can( $method = "opt_$first" ) ) {
71 $target->$method( $truth );
75 } elsif( $target->can('handle_unknown_option') ) {
80 $target->handle_unknown_option( $first ) || 0
98 $target->aside(
100 ) if $target->can('aside');