view bin/addquote @ 4297:2ca838dda29c

<oerjan> echo >bin/rnooodl \'perl -pe \'\\\'\'s/([Nn])ooodl/"$1@{[o x(3+rand 7)]}dl"/ge\'\\\'
author HackBot
date Tue, 14 Jan 2014 01:20:49 +0000
parents 7914d7e0b500
children 03afb1619ef2
line wrap: on
line source

#!/bin/sh
[ "$1" ] || exit 1
printf "%s\n" "$1" >>quotes
printf "%d) %s" $(qc | cut -d' ' -f1) "$1"