#!/usr/bin/perl
print "Hello World\n";

##</code><code>##

#!/usr/bin/perl -d:ptkdb
use CGI (':standard');
print header;
print start_html;
print "Hello";
print end_html;

##</code><code>##

couldn't connect to display ":0" at
 /perl_modules/lib/site_perl/5.12.0/s390x-linux/Tk/MainWindow.pm
 line 55.
##</code><code>##

$ENV{DISPLAY} = "localhost:0.0";