or download this
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;