in reply to AI in Perl - proof of concept

Good luck!