Help for this page
sub mk_pkg { for our $pkg (@_) { return sub { $pkg } } } sub mk_lex { for my $lex (@_) { return sub { $lex } } } ... print mk_pkg('abc')->(), "\n"; # XXX print mk_lex('abc')->(), "\n"; # abc