Mercurial > repo
view bin/anonlog @ 12001:00218840bf5c 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/\' share/whatis
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Mon, 04 Nov 2019 12:21:00 +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