sub to_be {
  print "be ";
  &to_do;
}

sub to_do {
  print "do ";
  &to_be;
}

&to_do;