How can I call a module in a Perl one-liner?
- by Zaid
Say I have a data file that I want to process; I want to take the maximum value of each of the column and append it to the end of each line.
INPUT:
T1 T2 T3
35.82 34.67 31.68
32.20 34.52 33.59
37.41 38.64 37.56
OUTPUT:
T1 T2 T3
35.82 34.67 31.68 35.82
32.20 34.52 33.59 34.52
37.41 38.64 37.56 38.64
I'm trying to implement this as a one-liner. So far, this is what I've come up with, although it complains that &main::max is undefined:
perl -MList::Util -ani.bak -e "print qq(@F).q( ).max(@F).qq(\n)" file1.txt
It seems that I haven't loaded the List::Util module. What's wrong? And is the header column an issue?
perlrun doesn't have a decent example on how to do this (actually it does now, my documentation was a little out-of-date).
