for ( 1..2,"a".."b") {
  ifnum();
  ifchar();
  print "\n"
}
 
sub ifnum {
  if    (/1/) { print } 
  elsif (/2/) { print }
  else        { return }
  print " is number";
}
 
sub ifchar {
  print && goto CONT if /a/;
  print && goto CONT if /b/;
  return;
 CONT:
  print " is character";
}

##</code><code>##

1 is number
2 is number
a is character
b is character