set f [open "highwire-journal-list.txt" "r"]
set body [join [split [read $f] "\n"] "|"]
set body [regsub -all {\.} $body {\\.}]
puts "http://($body)/cgi(/|/content/)(abstract|extract|full|refs|reprint|screenpdf|summary)\[A-Za-z0-9.-/\]+"

set f [open "highwire-journal-list.txt" "r"]
set body [join [split [read $f] "\n"] "|"]
set body [regsub -all {\.} $body {\\.}]
puts "http://($body)/cgi(/|/content/)(abstract|short|extract|full|refs|reprint|screenpdf|summary)\[A-Za-z0-9.-/\]+"

Sort out posting from PNAS abstract page.
Sort out posting from PNAS abstract page.

git-svn-id: 3e7511c6a72cd8f37051d3238e8364850d38d547@85 eb686afc-39fa-0310-a79f-9b3c69cefa1c
