Select Code to Download

C:\test>perl -E"printf( STDERR qq[\r$_] ), say 'X'x127 for 1 ... 1e6" 
+| perl -nE"sleep 100"
96

for /l %i in (1,1,8) do @perl -F"\t" -anle"print join chr(9), @F[2,0,5
+]" in%i.tsv > out%i.tsv