my $remotepks = $Registry->Connect ( "$zielserver", "LMachine/Software/Kerridge/KPrint/", { Delimiter=>"/" } ); my $allowload2 = $remotepks->AllowLoad( 1 ); my $loadkey2 = $remotepks->Load( "KPrintQueues_new.hive", "Queues" ); $remotepks->{"LMachine/Software/Kerridge/KPrint/Queues"}=$loadkey2;