Search Results

Do us all a favor: give us all your requirements up front, instead of letting us know about each new one them 1 by 1. We are not a code development service....

extract up to N and file name in...

If your files are relatively small a simple awk should work:


awk '
{ c[$1]++; f[$1] = f[$1] FILENAME " "; }
END {
for( x in f )
if( c[x] > 1 )
...

Best to ask for what you need on the first go :D
awk 'NR==1 { next }
{ T=0
for(N=2; N<=NF; N++) T+=$N;
T/=(NF-1)
print $1, T }' file > outfile

That...

awk 'NR==1{next}
{printf("%s\t", $1
printf("%.2f\n", ($2 + $3 + $4)/3 }' file1 > newfile

tr '\t' '\n' < infile > outfileSee the tr manual page for more details.

Try this: perl -ane '$a[$.]=$_;END{print sort {(split /\s+/,$a)[7]<=>(split /\s+/,$b)[7]}@a}' file

sort -nk2 file

Convert the files to unix file format using dos2unix utility and try again with paste please.

Hope that helps.
Regards
Peasant.

paste file1.txt file2.txt

see man page for further options.

It's the FNR>1 which probably skips the titles. FNR means File Record Number (usually line number), thus line1 is excluded...

Unilearn,

Anyways i dont have work now, so here it goes :)

-lane reads the file line by line, -a splits the line and store array @F.
Read perldoc to get more on this.
...

Indeed. Nice way to do it.

---------- Post updated at 01:13 PM ---------- Previous update was at 01:06 PM ----------




This should fix that.


perl -lane...

You can try this too (might be faster?:))perl -pe '/((\w+\t){6})(.*\n)/;$x=$1;$y=$3;$y=~s/(\w+)\t(\w+)(\t|$)/\1\2\3/g;$_="$x$y"' file

Try this. Here the output also will tab separated. Change \t to any other delimiter if you dont want tab separated output.

perl -lane...

Columns will be in the order of how the file are given.


perl -lane '$hash{$F[1]}.=" $F[8]";END{print "$_ $hash{$_}" for keys %hash}' file1 file2


And the output is

ab2 0.0007...

Try this:

perl -i.bck -ple's/(\d) +/\1\t/g' infile