view bin/log @ 4028:8fa96c7de250

<Bike> pastelogs esoteric.*Perl
author HackBot
date Wed, 20 Nov 2013 05:02:51 +0000
parents e037173e0012
children
line wrap: on
line source

#!/bin/sh
cd /var/irclogs/_esoteric
if [ "$1" ]; then
    grep -P -i -- "$1" ????-??-??.txt | shuf -n 1
else
    file=$(shuf -en 1 ????-??-??.txt)
    echo "$file:$(shuf -n 1 $file)"
fi