>perl -wle"$x = 010; print $x; print $x == 10 ?1:0"
8
0

##</code><code>##

>perl -wle"$x = '010'; print $x; print $x == 10 ?1:0"
010
1