blob: f847b4a905f05ec822ea7c4c4b38f02d84bf1a74 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
#!/usr/local/plan9/bin/rc
fn filter {
sed -e 's/ (.*//' -e 's/ /%20/g' -e 's|/|%2f|g' -e 's/&/%26/g'
}
while (o=`{read}) {
author = `{echo $o | sed -e 's/,.*//' | filter}
title = `{echo $o | sed -e 's/[^,]*, //' | filter}
# inauthor:Epp+intitle:Discrete%20Mathematics
echo inauthor:$author+intitle:$title
}
|