Find ( 3, \&english_bobby ); # Find( number_to_find, sub_ref_to_do ) sub Find { my ( $num, $sub ) = @_; &$sub for 1..$num; print "What have we here?\n"; } sub english_bobby { print "Hello " }
cheers
tachyon
s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print
In reply to Re: Limit Find();
by tachyon
in thread Limit Find();
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |