use strict;
        use Win32::SysTray;
        
        my $tray = new Win32::SysTray (
                'icon' => '/Icons/Application.ico',
                'single' => 1,
        ) or exit 0;
        
        $tray->setMenu (
                "> &Test" => sub { print "Hello from the Tray\n"; },
                ">-"      => 0,
                "> E&xit" => sub { return -1 },
        ); 
        
        $tray->runApplication;

##</code><code>##

use Win32::GUI;

my $taskbar = Win32::GUI::FindWindow("Shell_TrayWnd", "");

Win32::GUI::Hide($taskbar);

sleep(3);

Win32::GUI::Show($taskbar);

##</code><code>##

Can't open gtk_bundle/lib/pkgconfig/libglade-2.0.pc: No such file or directory.
Error GETing http://www.gtk.org/download-windows.html: Not Found at gtkinst.pl line 113