From: Ken-ichi Mito <mitty@mitty.jp>
Date: Tue, 4 Mar 2014 21:49:04 +0000 (+0900)
Subject: print usage if no arguments
X-Git-Url: http://lab.mitty.jp/git/?a=commitdiff_plain;h=00355546c42a724d647f978c4fa7cf04d492679e;p=lab.git

print usage if no arguments
---

diff --git a/misc/httpbench.pl b/misc/httpbench.pl
index c36ed64..78191dd 100755
--- a/misc/httpbench.pl
+++ b/misc/httpbench.pl
@@ -9,6 +9,8 @@ use Parallel::ForkManager;
 use LWP::Simple;
 use Time::HiRes qw(sleep);
 
+usage() if (@ARGV == 0);
+
 GetOptions(
     'h|help'            => \ my $help,
     'i|inputfile=s'     => \ my $file,