perl -e 'print "yikes\n" if int("1upmanship")'
perl -e 'print "Zero is a number.\n" if int("0")'