http://qs321.pair.com?node_id=1143717


in reply to removing leading 0's

OO10 is an octal number equal to 8 (decimal) therefore $y = 8 not 10.

This may help explain

perl -E 'say 0010,",","0010";' >8,0010