check_iseries with snmp

Basic perl plugin using Nagios::Plugin and snmpwalk.
Monitors:
load
number of logged on users
ASP storage
uptime
jobs
(not as feature-complete as the check_as400 plugin published)

You need to have Nagios::Plugin perl module installed:
ubuntu
cpan
cpan>install Monitoring::Plugin

redhat/centos
sudo yum install perl-Monitoring-Plugin

You also need snmpwalk installed:
(On ubuntu)
apt-get install snmp

The script has been tested with:
model 810 v6r2
model 550 v7r1/v6r1

Drop the script in you plugins directory, in many cases: /usr/lib64/nagios/plugins or /usr/local/nagios/libexec

Test script with:
nagios@nagios:/usr/lib64/nagios/plugins/check_iseries.pl -H 192.168.169.2 -c public -o asp -w 80
check_iseries OK – Current ASP used (%): 73.23 | total=175825223680b;; usage=128763555840b;;

define command{
command_name check_iseries
command_line /usr/bin/perl $USER1$/check_iseries.pl -H $HOSTADDRESS$ -c $ARG1$ -o $ARG2$ -w $ARG3$
}

define service{
use generic-service
name iseriesLoad
hostgroup_name iseries-servers
service_description iseries load
check_command check_iseries!public!load!80
}
define service{
use generic-service
name iseriesUsers
hostgroup_name iseries-servers
service_description iseries users
check_command check_iseries!public!users!90
}
define service{
use generic-service
name iseriesASP
hostgroup_name iseries-servers
service_description iseries ASP usage
check_command check_iseries!public!asp!80
}