Perl does have lambdas...

  my $double = sub {$_[0] * 2};
  $double->(5);