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++; }