Select Code to Download

sub whatisit{
  my $it = shift;
  if ($it eq 'yada yada'){
...
      return(\&email(zak));
  }
}