Select Code to Download

my @values = values (%$result);
foreach my $key (@values) {
...
}

print "status:$status\n";

Global symbol "$status" requires explicit package name at C:\SNMP.pl l
+ine 21.
Global symbol "$status" requires explicit package name at C:\SNMP.pl l
+ine 24.
Global symbol "$status" requires explicit package name at C:\SNMP.pl l
+ine 26.
Global symbol "$status" requires explicit package name at C:\SNMP.pl l
+ine 30.
Execution of C:\SNMP.pl aborted due to compilation errors.