Help for this page
use if $^O =~ /win32/i, 'Win32::TieRegistry', Delimiter=>"/", ArrayVal +ues=>0;
if ( $^O =~ /win32/i ) { require Win32::TieRegistry; Win32::TieRegistry->import(Delimiter=>"/", ArrayValues=>0); }