~/perl/perlmonks$ ./leading_zeroes.pl
 Num: 000007
 Num: 000314
 Num: 000023
 Num: 513465
 Num: 004444
 Num: 000029