1
2
3
4
5
6
7
8
9
10
11
//Die Funktion gibt eine Hashtabelle zurück.
my $R_tbl = $snmp_session->get_table{$S_mac);
//Die Foreach schleife um die Inhalte auszugeben
foreach my $key {keys %$R_tbl}
{
//Zuweisung
$mac = $R_tbl->{$key};
//Ausgabe im Bildschirm
#print " $mac " ;
}
1 2 3 4 5 6 7 8 9 10 11
# Die Funktion gibt eine Hashtabelle zurück. my $R_tbl = $snmp_session->get_table($S_mac); # Die Foreach schleife um die Inhalte auszugeben foreach my $key (keys %$R_tbl) { # Zuweisung $mac = $R_tbl->{$key}; # Ausgabe im Bildschirm print "$key = $mac\n"; }