Help for this page
#!perl ... + 1234
return $_[0] =~ /^\s*[\+\-]?\d+\s*$/;
if(( $_[0] =~ /^\s*[\+\-]?\d+\s*$/) and ($_[0] > 0)) { return 1; ... else{ return undef; }
www.com | www.net | www.org
No recent polls found
