1 --- contrib/check_snmp_procs.pl.orig 2008-04-23 12:13:17.833685899 +0000
2 +++ contrib/check_snmp_procs.pl 2008-04-23 12:15:18.456846167 +0000
10 my $max_no_processes = 999999;
12 exit $ERRORS{'UNKNOWN'};
15 +my ($longest_wanted, $longest_current);
17 ($longest_wanted, @wanted_procs) = parse_wanted_procs($opt_verbose, $opt_wanted_procs, $opt_warning, $opt_critical);
22 my($verbose, $host, $username, $privpassword, $authprotocol, $authpassword, $community, $port, $oidname, $snmp_version) = @_;
23 my(%process_list, %process_pid_list, $result);
24 - my $process_list_longest = 1, $not_done = 1;
25 + my ($process_list_longest, $not_done) = (1, 1);
26 my(@args, @oids, $oid, $name);
28 ($session, $error) = Net::SNMP->session(