Select Code to Download

sub foo {
  print "Foo!\n";
...
  or die "Can't find '$sub' in package '$pkg'\n";

$cr->();