print "no editor found\n"
  if (!defined $ENV{EDITOR} && !defined $ENV{VISUAL});

##</code><code>##

die "no editor found\n"
  unless my $editor = $ENV{EDITOR} || $ENV{VISUAL};
print "predefined editor: $editor\n";