if ($ENV{DISPLAY}) {
  print "Found X server at $ENV{DISPLAY}\n";
};