Mercurial > repo

view src/99.sh @ 11331:a7f50f1f75f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<wob_jonas> perl -e open$h,"<",($f="wisdom/font");local$/;$_=<$h>; s"& \\S+/twitter\\.com/\\S+""; if (1) { open $o,">",$f;print$o $_; } print;
author HackBot
date Wed, 17 Jan 2018 21:03:18 +0000
parents bb911493ba61
children
line wrap: on
line source

b=bottle a=({no+more+$b\s,1+$b,{2..99}+$b\s}+of+beer) w=on+the+wall
x=(Take+one+down,+pass+it+around Go+to+the+store+and+buy+some+more)
for i in {99..0};{
echo "${a[i]^} $w, ${a[i]}.
${x[!i]}, ${a[i-1]} $w."
}|tr + \