benjo+2008-08-15 12:35:04--

Code (perl): (dl )

1
2
3
4
5
6
7
8
9
10
11

while ($i <= 120){
        my $printer_ip = $SNMP_Target.$i;
        $snmp_value = `snmpget -c public -v1 -OvQ $printer_ip HOST-RESOURCES-MIB::hrDeviceDescr.1 2>1`;
        $snmp_value =~ s/\"//g;
        my $printer_name = $snmp_value;
        # Zählen der Vorkommen des Druckers
        $printers{$printer_name}->{$printer_ip}++;
        # Gesamtanzahl bei Druckenamen nur erhöhen, wenn Drucker mit IP noch nicht gezählt
        $printers{$printer_name}->{'Gesamt'}++ if $printers{$printer_name}->{$printer_ip}==1;
        $i++;
}

meinst du das so ?, Danke für deine Hilfe

print $printers{$_}->{'Gesamt'} . " " . $_ for keys %printers;