perl -wle ' s/^/("0"x(6-length))/xe and print for @ARGV;' 133 121 10 13