use if $^O =~ 'MSWin32', 'Win32::TieRegistry';