use Win32::TieRegistry();

C:\_kgw>perl test.pl
Can't load 'L:/<pfad>perl/v5.8.5_5/5.8.5/lib/auto/Win32API/Registry/Registry.dll' for module Win32API::Registry: loa
d_file:Die angegebene Prozedur wurde nicht gefunden at L:/<pfad>/perl/v5.8.5_5/5.8.5/lib/DynaLoader.pm line 230.
 at L:/<pfad>/perl/v5.8.5_5/5.8.5/lib/Win32/TieRegistry.pm line 23
Compilation failed in require at L:/<pfad>/perl/v5.8.5_5/5.8.5/lib/Win32/TieRegistry.pm line 23.
BEGIN failed--compilation aborted at L:/<pfad>/perl/v5.8.5_5/5.8.5/lib/Win32/TieRegistry.pm line 23.
Compilation failed in require at test.pl line 10.
BEGIN failed--compilation aborted at test.pl line 10.

    # Many dynamic extension loading problems will appear to come from
    # this section of code: XYZ failed at line 123 of DynaLoader.pm.
    # Often these errors are actually occurring in the initialisation
    # C code of the extension XS file. Perl reports the error as being
    # in this perl code simply because this was the last perl code
    # it executed.

Zeile 230 ->    my $libref = dl_load_file($file, $module->dl_load_flags) or
	croak("Can't load '$file' for module $module: ".dl_error());