- or download this
C:\test>perl -e"printf qq[\r%s], $_ for '0001' .. $ARGV[0]" 1999
1999
- or download this
C:\test>perl -e"printf qq[\r%s], $_ for '0001' .. $ARGV[0]" "1999"
1999
- or download this
C:\test>perl -e"printf qq[\r%s], $_ for '0001' .. $ARGV[0]" '1999'
999999