Improved choice of link to Sean Burke's original Perl script