$ perl -wMstrict -le 'print 0+"010"'
10
$ perl -wMstrict -le 'print 0+ 010 '
8