Help for this page
@test = ( sub { $_[0] < 3 } ); ... { print join q[ ] , grep $t->( $_ ), 1 .. 5; }
www.com | www.net | www.org
No recent polls found