Merge pull request #123 from Naoir/perl