Select Code to Download

sub multi_foreach(&@) {
  my $code = shift;
...
}

multi_foreach { say join ' ', @_ } \( @a, @b, @c );

sub multi_foreach(&@) {
  my $code = shift;
...
}

multi_foreach { say join ' ', @_ } \( @a, @b, @c );