Help for this page
perl -e 'if('42'=~ /[:^digit:]/) {print "42 is a digit\n"}; else {prin +t "42 is not a digit\n"}';
> > >