sub Tray_RightClick { $win->TrackPopupMenu($menu->{Tray}, Win32::GUI::GetCursorPos()); return 1; }