Higher Order Perl