in reply to Left padding a number with zeros: PerlFaq method didn't work for me.
my $len = 10; print "1: [", sprintf("%${len}s", "*"), "]\n"; print "2: [", sprintf("%*s", $len, "*"), "]\n"; [download]