Name: 2009-08-18 10:35
Output a thousand Sussmen in an individualistic way.
#!/bin/sh
if [ -z $1 ]; then
echo "USAGE: progfind [regex]" 1>&2
else
wget -qO- http://dis.4chan.org/prog/subject.txt \
| sed '/'"$*"'/I!d;s/^\(.*\)<>.*<>.*<>\(.*\)<>.*<>.*<>\(.*\)$/\
Title: \1\
URL: http:\/\/dis.4chan.org\/read\/prog\/\2\
Posted: \2\
Last Post: \3/'\
| perl -MPOSIX -ple\
's/^([a-z ]*Post[a-z]*: )(\d+)$/$1.strftime"%c",localtime$2/gei,chomp'
fi./progfind.sh sussman