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