couldn't connect to display "blue:0.0" at /opt/perl/lib/site_perl/5.6.1/PA-RISC1.1-thread-multi/Tk/MainWindow.pm line 55.
MainWindow->new() at .//test.pl line 4