annotate bin/learn_append @ 6405:30b6ed06491d

<oerjan> learn Puns are fun. Ask shachaf about them.
author HackBot
date Fri, 18 Dec 2015 00:14:14 +0000
parents 56dcce63901b
children 38b26e48d344
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5643
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
1 #!/bin/bash
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
2 topic=$(echo "$1" | lowercase | sed 's/^\(an\?\|the\) //;s/s\? .*//')
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
3 stuff=$(echo "$1" | cut -d' ' -f2-)
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
4 perl -i -p -e 's/\n/ /' "wisdom/$topic"
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
5 echo "$stuff" >>"wisdom/$topic"
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
6 echo -n "Learned '$topic': "
56dcce63901b <tswett> revert
HackBot
parents:
diff changeset
7 cat "wisdom/$topic"