Help for this page
my $Disc = get_word(); my $D1 = substr($Disc,0,7); my $D2 = substr($Disc,7,1); print "Word $Disc is corrupt!\n" if $D1 !~ /0+/ or $D2 !~ /[0-9]+/;
www.com | www.net | www.org
No recent polls found
