Adding Perl One Liners

Kicking off unit testing of Perl one liners with Perl!