sub s1 {
  print "s1";
  if(defined(&main::s2)) {main::s2()}
  else {s2()}
}