view bin/randbin @ 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 aa422ca91c37
children
line wrap: on
line source

#!/bin/dash
f=$(find bin -ipath "bin/*$1*" -type f -print0 | shuf -z -n1); if [ -n "$f" ]; then echo -n "${f#bin/}//"; grep '' "$f"; else echo "That's not binary."; fi | rnooodl