X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=bin%2Firspy-stats.pl;h=3bfe077628d541223adcc49433513d3b20b4fe2f;hp=a9b9adec4c2df9362d8ac26a5b17cb4af18fc44d;hb=0be609769852d0c19faf33b001d90554909ba9e4;hpb=5dd9c46e9bd2d6bd99a0d2aa728ed5430aeec3e8 diff --git a/bin/irspy-stats.pl b/bin/irspy-stats.pl index a9b9ade..3bfe077 100755 --- a/bin/irspy-stats.pl +++ b/bin/irspy-stats.pl @@ -1,6 +1,5 @@ -#!/usr/bin/perl -w +#!/usr/bin/perl -# $Id: irspy-stats.pl,v 1.4 2007-01-24 09:28:02 mike Exp $ # # perl -I ../lib irspy-stats.pl localhost:8018/IR-Explain---1 "net.host=*indexdata*" @@ -8,7 +7,7 @@ use strict; use warnings; use ZOOM::IRSpy; -if (@ARGV > 2) { +if (@ARGV < 2) { print STDERR "Usage: $0 [CQL-query]\n"; exit 1; }