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=419ded94e62f86cf55e18200d209f8a06704ff91;hpb=e8a3ce9f6d7d213621575e8923ed07dfab35885b 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; }