annotate bin/quotes @ 10843:2d5ba2d44680

<Jafet> le/rn double dactyl//Curious spurious verse form, ostensibly catchy to hear but herculean to write. Sadly its bent on the sesquipedalian makes double dactyls pretentious and trite.
author HackBot
date Fri, 28 Apr 2017 02:49:16 +0000
parents ad85e082af96
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
e037173e0012 Initial import.
HackBot
parents:
diff changeset
1 #!/bin/sh
e037173e0012 Initial import.
HackBot
parents:
diff changeset
2 allquotes | if [ "$1" ]; then
e037173e0012 Initial import.
HackBot
parents:
diff changeset
3 if expr "$1" + 0 >/dev/null 2>&1; then
e037173e0012 Initial import.
HackBot
parents:
diff changeset
4 sed "$1q;d"
e037173e0012 Initial import.
HackBot
parents:
diff changeset
5 else
e037173e0012 Initial import.
HackBot
parents:
diff changeset
6 grep -P -i -- "$1"
e037173e0012 Initial import.
HackBot
parents:
diff changeset
7 fi
10027
ad85e082af96 <oerjan> ` cp bin/quote{,s} # add rng improv
HackBot
parents: 0
diff changeset
8 else shuf --random-source=/dev/urandom -n 1; fi