view bin/anonlog @ 2268:b1e46374cb37

<kmc> addquote <Bike> i\'ve always wanted to xor swap transfinite ordinals
author HackBot
date Tue, 26 Feb 2013 21:46:34 +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