diff options
Diffstat (limited to 'sbosnap')
-rwxr-xr-x | sbosnap | 11 |
1 files changed, 6 insertions, 5 deletions
@@ -39,21 +39,22 @@ EOF return 1; } -show_usage() and exit 1 unless exists $ARGV[0]; - my ($help, $vers); GetOptions('help|h' => \$help, 'version|v' => \$vers); -show_usage() and exit 0 if $help; -show_version() and exit 0 if $vers; +if ($help) { show_usage(); exit 0 } +if ($vers) { show_version(); exit 0 } + +if (!@ARGV) { show_usage(); exit 1 } # check for a command and, if found, execute it my $command; if ($ARGV[0] =~ /fetch|update/) { $command = $ARGV[0]; } else { - show_usage() and exit 1; + show_usage(); + exit 1; } if ($command eq 'fetch') { fetch_tree() } |