Revert "Perl changes"

Reverts jgm/stmd#27