sub one {
  print "In one\n";
  goto &two;
  print "never print this if you goto\n";
}

sub two {
  print "In two\n";
}

one();