Re: Adding Leading Zeros

Simple trick with perl. use strings instead of numbers:

foreach my $index ('00'..'12') {
vs
foreach my $index (00..12) {

Comment on Re: Adding Leading Zeros Select or Download Code

Replies are listed 'Best First'.
Re^2: Adding Leading Zeros by Anonymous Monk on Aug 29, 2016 at 18:28 UTC
Oh! You must mean some like this: `my @inputs = (20188, 18350, 4005, 127736, 10291, 4937, 57500, 150494); sub with_zeroes { grep( $_ == $_[0], '0000000000' .. '9999999999' ) } say with_zeroes($_) for @inputs;` [download] Small doubt about efficiency remains however.	[reply] [d/l]