X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fgrepdbg;h=ebf581bd50a5b33d745229ebabd6a3523df3b6f9;hb=8be46ac1786265a7ba6ee91b31141ecd017ecb49;hp=5ab380f6de6d6638f1933ec2155a04f32cc5a5a0;hpb=c7b8633ac755627ff5ff4b991c52205016ee4e2e;p=spider.git diff --git a/perl/grepdbg b/perl/grepdbg index 5ab380f6..ebf581bd 100755 --- a/perl/grepdbg +++ b/perl/grepdbg @@ -3,11 +3,17 @@ # Program to do a grep with dates and times on the debug # files # -# dispdbg [-nnn ...] +# grepdbg [nn] [-mm] # -# the -nnn is the day you what to look at -1 is yesterday -0 is today + +# nn - is the day you what to look at: 1 is yesterday, 0 is today # and is optional if there is only one argument -# is the string, a caseless search is done +# +# -mmm - print the mmm lines before the match. So -10 will print +# ten lines including the line matching the regular expression. +# +# is the regular expression you are searching for, +# a caseless search is done # # @@ -23,7 +29,7 @@ BEGIN { unshift @INC, "$root/local"; } -use DXVars; +use SysVar; use DXUtil; use DXLog; use Julian;