#gawk script to merge missing URLs into gecco2000.bib #WBL 5 Dec 2004 # # $Revision: 1.00 $ $Locker: wlangdon $ # BEGIN { if(rooturl=="") rooturl="http://www.cs.bham.ac.uk/~wbl/biblio/gecco2000/"; printf("%WBL URL's added by gecco2000.awk $Revision: 1.00 $\n"); printf("\n"); } (index($0," url =")==1 && bibfile()) { split($3,t,"[{}]"); if(index(t[2],"http")==0) { printf(" url = {%s%s.pdf},\n", rooturl,t[2]); } else print $0; } (index($0," url =")!=1 && bibfile()) { print $0; } END{ } function parse(x, t,n,tt) { split(x,t,"."); n=split(t[1],tt,"/"); return tt[n]; } function num(x, t,n,tt) { split(x,t,"."); n=split(t[1],tt,"-"); return tt[n]; } function pdffiles() { return index(FILENAME,".pdfs")!=0; } function bibfile() { return index(FILENAME,".bib")!=0; }