Help for this page
while (1) { ... next if () ... last }
LINE: { chomp($row = <$fh>) or last LINE; redo LINE if $key < $min; $done = 1 && return if ($key > $max); }
sub itter_maker { # return a function that passes back data allowed b +y the given predicate subroutine my $predicate = shift; #CODE ref ... return; }); }
www.com | www.net | www.org
No recent polls found