elsif ( $^O eq 'dos' or -e "con" or $^O eq 'MSWin32' ) {
  $console = "con";
}