my $sub = sub { ...; $sub->(); .. };