c:\@Work\Perl\monks>perl -wMstrict -le
"my $y = '010';
 print qq{before: '$y'};
 ;;
 print $y + 1;
"
before: '010'
11