Perl it is