Checkpoint HA Nagios monitoring

For a number of reasons I need to be able to know which firewall is the active on in a Checkpoint cluster. I'd like to be notified when the active node switches to the secondary box. I did not finding anything like that around the net so I took one of the check_snmp_* scripts by Patrick Proy and adapted it. Now, I do own the Camel book, yet I've never been able to grow fond of the Perl language. You'll have to excuse my suckage in this script ;)

Here it is: http://michele.pupazzo.org/files/check_snmp_cpfw_ha.pl