Subversion Repositories svnkaklik

Rev

Rev 635 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 635 Rev 636
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