Convert for computer digestion.

1 files changed, 12 insertions, 0 deletions

diff --git a/m2list.rc b/m2list.rc
new file mode 100755
index 0000000..f847b4a
--- /dev/null
+++ b/m2list.rc
@@ -0,0 +1,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
+}