For historic reference:

The original code doesn't work with modern perl, and needs a slight tweak to get working.

Original, and working code can be found here : https://github.com/drpowell/perl-obfuscated-1997