I see what your saying, but where would I paste and what parts do I change? What does the first line mean?

I'm trying to break it down so, correct me where I'm wrong.

c:\test>perl -MO=Deparse -l -0x3e -ane

Is this the path for my in file?

"@F||next; s/length=//for$F[1];

@F is setting an array to F, so $F1 would equal the first column. Then you sub out the length= using the substitutor code.

+@F[5]=join'', @F[5..99];

This means join all columns up to 5, and then for column 5 join any additional columns from 5..99.

$#F=5; print'>',join',',@F" junk.dat

Not sure on this one, what does the # mean? Then the print statement: print the carat, the join statement, and then the array F? What is junk.dat? Is this where I put the outfile name?

I want to understand what is going on more than just a copy and paste job. This is getting long, but I'll work through the rest and post again.