I only finished the Perl wikibook (which is woefully incomplete and can be found here) when I wrote this... I also looked at some obfuscated code...