my $dummy; goto &{ sub { $dummy if 0;