my $sub = sub {
   # do something
};