Mercurial > repo
view bin/quote @ 12117:bd76992a2fec draft
<fizzie> fetch /hackenv/bin/delquote https://hack.esolangs.org/get/bin/delquote
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Sat, 16 Nov 2019 23:08:24 +0000 |
parents | 3e54f8d1843f |
children |
line wrap: on
line source
#!/bin/sh allquotes | if [ "$1" ]; then if expr "$1" + 0 >/dev/null 2>&1; then sed "$1q;d" else grep -P -i -- "$1" fi else shuf --random-source=/dev/urandom -n 1; fi