in reply to php to perl

Have a look on CPAN: distance.

In Section Seekers of Perl Wisdom