From dac2224a876994cb6d58e81f325eead10d292558 Mon Sep 17 00:00:00 2001 From: dcp1990 Date: Thu, 28 Oct 2004 20:24:15 +0000 Subject: [PATCH] Debugging stuff --- perl/graphlog.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/graphlog.pl b/perl/graphlog.pl index 44de603..0bf74f4 100755 --- a/perl/graphlog.pl +++ b/perl/graphlog.pl @@ -6,7 +6,7 @@ use GD::Graph::colour qw( :files ); GD::Graph::colour::read_rgb( "/usr/X11R6/lib/X11/rgb.txt"); if($ARGV[0] eq '' or $ARGV[1] eq '') { -print STDERR "Needs more arguments.\n"; +print STDERR "Needs more arguments.\n (@ARGV)"; exit 1; } open(TLG, $ARGV[0]);