wxWidgets (formerly wxWindows) supports tray icons on windows, I don't know if this functionality has already been wrapped on wxPerl, but it shouldn't be too difficult to do anyway