Another minor addition for Perl