in reply to Problems with Tk on Win32
BEGIN { if ($^O =~ /^Win/) { require Win32::Registry; Win32::Registry->import; } } [download]
Actually it's even simpler!
#!c:/opt/perl -w . . . use if $^O=~/^win/i, Win32::TieRegistry; . . . [download]
if.pm is currently in the standard distro.
madams55075.spamtrap.@comcast.net=~s/\.spamtrap\.//;