free hit counter

Friday, December 19, 2008

quick string replacement

When I used to write a lot more perl one liners for cleaning up text files, this kind of thing came instantly.

It took me longer than I expected to conjure up this one which grabs all the data from a specific spot in the middle all the way to the line ending:

perl -ne 'if (s/MTST.*Out:(.*)/$1/){ print;}' results_4.txt


Post a Comment

<< Home