>perl -le"print 1 == '1.0' ?1:0"
1

>perl -le"print 1 eq '1.0' ?1:0"
0