use Win32::TieRegistry( Delimiter => '#', ArrayValues => 0);
my $pound = $Registry->Delimiter("/");