#!/usr/bin/perl -w 
 
use strict; 
use warnings; 
use Gtk2 -init; 
use Gtk2::Gdk::Screen; 

print qq(All GOOD !!); 

main Gtk2;