$ perl -e'$c="10e0";$d="1e1";print $c == $d,$/'
1
$ perl -e'$c="10e0";$d="1e1";print $c eq $d,$/'

$ perl -e'$c=10e0;$d=1e1;print $c eq $d,$/'
1
$ perl -e'$c=10e0;$d=1e1;print $c == $d,$/'
1