Mercurial > repo
view bin/wisdom @ 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 | 602a161bac23 |
children | 34478fd0398b |
line wrap: on
line source
#!/bin/sh f=$(find wisdom -ipath "wisdom/*$1*" -type f -print0 | shuf --random-source=/dev/urandom -z -n1); if [ -n "$f" ]; then echo -n "${f#wisdom/}//"; cat "$f"; else echo "That's not wise."; fi | rnooodl