diff options
author | Jacob Pipkin <j@dawnrazor.net> | 2012-09-21 05:40:32 -0500 |
---|---|---|
committer | Jacob Pipkin <j@dawnrazor.net> | 2012-09-21 05:40:32 -0500 |
commit | 6453df90bdb386b36a6bc9db8d5033c5b8ea7639 (patch) | |
tree | 5a5b93d2b0d136fdf575fcc63160c4bed4678fe0 | |
parent | 71ded25db8606d492bb9944d723e1c9c26c0e877 (diff) | |
download | sbotools2-6453df90bdb386b36a6bc9db8d5033c5b8ea7639.tar.xz |
removed extraneous qw(:config), fixed some spacing
-rwxr-xr-x | sbocheck | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -13,14 +13,14 @@ use 5.12.3; use strict; use warnings FATAL => 'all'; use SBO::Lib; -use Getopt::Long qw(:config); +use Getopt::Long; use Text::Tabulate; use File::Basename; my $self = basename ($0); sub show_usage () { - print <<EOF + print <<EOF Usage: $self Options: @@ -34,7 +34,7 @@ EOF my ($help, $vers); -GetOptions ('help|h' => \$help, 'version|v' => \$vers); +GetOptions ('help|h' => \$help, 'version|v' => \$vers); show_usage && exit 0 if $help; show_version && exit 0 if $vers; |