view bin/addquote @ 11999:64fb792e12e8 draft

<wib_jonas> `` perl -pi -e \'s/^(url\\(1hackeso\\) -) .*/$1 print URL for a file in the hackenv hg repository and web access of the repository/; print\' share/whatis
author HackEso <hackeso@esolangs.org>
date Mon, 04 Nov 2019 12:20:27 +0000
parents 56dcce63901b
children e1ce00d00682
line wrap: on
line source

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