Mercurial > repo

view paste/paste.19593 @ 2266:4767030cee0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<elliott> addquote <ais523> Phantom_Hoover: my department teaches prolog, to second years I think <ais523> some people choose it because it isn\'t ocaml, and then are disappointed to find it has lists
author HackBot
date Tue, 26 Feb 2013 18:41:42 +0000
parents 1794894163e2
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:$(grep "<.*>" $file | shuf -n 1)" | sed "s=<[^>]*> =="
fi