Mercurial > repo
view bin/anonlog @ 11975:95402bdc6e71 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:56:16 +0000 |
parents | ee2e8950bb3c |
children |
line wrap: on
line source
#!/bin/sh cd /var/irclogs/_esoteric if [ "$1" ]; then grep -P -i -- "$1" ????-??-??.txt | shuf -n 1| sed "s=<[^>]*> ==" else file=$(shuf -en 1 ????-??-??.txt) echo "$file:$(grep "<.*>" $file | shuf -n 1)" | sed "s=<[^>]*> ==" fi