Subversion Repositories svnkaklik

Rev

Rev 635 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log

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