perl -MWin32::GUI -le"print for keys %::"
perl -MWin32 -le"print for keys %::"