You are viewing a single comment's thread. Return to all comments →
perl
while(<>){ chomp; next if $. == 1; /^[_\.]\d+[a-zA-Z]*_?$/ ? print "VALID\n" : print "INVALID\n";
Seems like cookies are disabled on this browser, please enable them to open this website
Alien Username
You are viewing a single comment's thread. Return to all comments →
perl