Select Code to Download

print "I am here!" if grep {/$bar/} @foo;

sub IsItThere($$) {
  my $testarray = shift;
...
  }
  return 0;
}