Unterschiedliche Ergebnisse Hashfeld bei Vista und XP

[Caleb6666]

Hallo,

möchte in einem Hashfeld alle bestehenden Druckerports (Anschlüsse) eines im Netzwerk befindlichen Rechners einlesen. Habe dazu einen PC der drei Anschlüsse enthält abgefragt. Unter dem Betriebssystem Windows XP werden alle Druckerports im Hash %port korrekt abgespeichert. Wenn das ganze jedoch auf einem anderern Rechner unter Vista ausgeführt wird enthält der Rückgabewert %port jedoch nur einen Druckerport und nicht alle Drei. Woran kann das liegen?

Hier die Funktion:

sub getDruckerPorts {
	my $host=$_[0];
	my ($ret,@data)=doCmd("prnport","-s $host -l"); 
	
	my %port;
	my $name;
	for my $line (@data) {
		$name=$1 if $line =~ /^Anschlussname (.*)/;            
		if ($line =~/^Hostadresse (.*)/) {
			$port{$name}=$1;
                        print $port{$name}=$1; #Test:Liefert als Ergebnis bei XP oder 
                                    Vista jeweils die 3 Druckerports --> Ergebnis korrekt!
		}
	}
	print %port;   #Test:  Liefert bei XP 3 Druckerports, bei VISTA jedoch nur einen
                       --> Ergebnis falsch!
	return %port;

	for my $n (keys %port) {
		print "$n -> $port{$n}\n";
		
	}
	
}

Warum ist ausserhalb der Schleife bei Vista nur ein Druckerport im Hash %port?

Vielen Dank!!

[Christian Marquardt]

print "@{[ %port ]}\n";

[Caleb6666]

Danke für die schnelle Antwort!

Der Print-Befehl war nur ein Test um den Inhalt zu testen. Das Problem ist der Rückgabewert %port, der bei Windows XP 3 Einträge, bei Vista jedoch nur einen enthält :-( !!

[Caleb6666]

Das Feld @data ist korrekt gefüllt mit allen 3 Anschlüssen!
Nur der Rückgabewert %port enthält unter Vista auf einmal nur noch einen Anschluss! Führe ich das ganze auf einem XP-Rechner aus, sind im Hash %port
3 Anschlüsse vorhanden!

Was könnte das sein?

[Markus Lahr]

Bitte keine Crossposts...