sbotools2

commit ec9042d5a06073dfe698099b455da3192e2f7783
parent 65de20fd27ecc3dcc12ef21b2e0dcd74b9fe8f14
Author: J Pipkin <j@dawnrazor.net>
Date:   Sat,  8 Sep 2012 12:48:08 -0500

sbocheck converted to Getopt::Long

Diffstat:
M
sbocheck
 | 
8
++++----

1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/sbocheck b/sbocheck
@@ -13,13 +13,13 @@ use 5.12.3;
 use strict;
 use warnings FATAL => 'all';
 use SBO::Lib;
-use Getopt::Std;
+use Getopt::Long qw(:config bundling);
 use Text::Tabulate;
 
-my %options;
-getopts ('v',\%options);
+my $vers;
+GetOptions ('version|v'	=> \$vers);
 
-show_version && exit 0 if exists $options{v};
+show_version && exit 0 if $vers;
 
 update_tree;