view bin/wisdom @ 11973:c47f90df9112 draft

<b_jonas> `` perl -pi -e \'/(bf\\(1egobot\\))/ and $_ = "$1 - evaluate brainfuck snippet\\n"\' share/whatis
author HackEso <hackeso@esolangs.org>
date Mon, 21 Oct 2019 21:52:10 +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