Subversion Repositories svnkaklik

Rev

Rev 635 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log

Rev Author Line No. Line
633 kaklik 1 
#!/usr/bin/awk -f
636 kaklik 2 
# merge .IVS files togeather
633 kaklik 3 
BEGIN {
635 kaklik 4 
f="";
5 
val="";
636 kaklik 6 
#colums="";
633 kaklik 7 
}
635 kaklik 8 
{
636 kaklik 9 
  if (f != FILENAME) {
10 
    colums = colums OFS FILENAME; NR=0;
11 
    do {
12 
      if (FNR > 43) data[$1] = data[$1] OFS $2;
13 
    }   while (getline != 0);
635 kaklik 14 
    f=FILENAME;
636 kaklik 15 
  }
633 kaklik 16 
}
636 kaklik 17 
END{
18 
#print colum;
19 
for(val in data) print val,data[val];
635 kaklik 20 
}
21