print "Window handle is $Window->{-handle} \n";