$ perl -e 'print "01234" == "1234"'
1