===================================================================
RCS file: /cvs/nagios/check_openbgpd/check_openbgpd,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- nagios/check_openbgpd/check_openbgpd	2015/03/25 03:20:06	1.8
+++ nagios/check_openbgpd/check_openbgpd	2015/03/26 04:42:23	1.9
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $AFresh1$
+# $AFresh1: check_openbgpd,v 1.8 2015/03/25 02:20:06 andrew Exp $
 ########################################################################
 # check_openbgpd *** A nagios check for OpenBSD bgpd
 #
@@ -9,6 +9,7 @@
 use warnings;
 
 use 5.010;
+use if $] >= 5.016, experimental => 'switch';
 
 local %ENV = ();
 
@@ -263,9 +264,9 @@
         state( $w, $c );
 
         my $opt = shift @argv;
-        given ($opt) {
+        for ($opt) {
             when ( '-V' || '--version' ) {
-                print_revision( $PROGNAME, '$Revision: 1.8 $ ' );
+                print_revision( $PROGNAME, '$Revision: 1.9 $ ' );
                 exit $ERRORS{'OK'}
             }
             when (/^-?-h(?:elp)?/xms) { print_help(); exit $ERRORS{'OK'} }
@@ -369,7 +370,7 @@
 
 EOL
 
-    print_revision( $PROGNAME, '$Revision: 1.8 $' );
+    print_revision( $PROGNAME, '$Revision: 1.9 $' );
 
     print $LICENSE;