$ perl -e "print 'a' == '1b'"