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