Select Code to Download

sub foo {
   for (...) {
...
   }
   return 0;
}

sub foo {
   my $found = 0;
...
   }
   return $found;
}