Jump to content

installing perl script


Recommended Posts

If you'll add this to the script that gets executed, it will create an error.txt file with the errors.

 

BEGIN { 
use CGI::Carp qw(carpout); 
use diagnostics;
open(LOG, ">errors.txt"); 
carpout(LOG);
close(LOG);
}

 

Link to comment
Share on other sites

Does that mean i cant use the apache logs? I guess this script using apache log to create statistic reports, so if i cant access it, its not worth trying.

 

And yeah i did try it, but since i dont know anything about perl i cant understand how to fix it. If you dont mind please tell me what to do considering the errors. Here is the error log http://antisocialnetworking.co.cc/stats/da...tats/errors.txt

Link to comment
Share on other sites

Guest Geoff

"my" variable $bytes masks earlier declaration in same scope at dslogs.pl line
    180 (#1)
    (W misc) A "my" or "our" variable has been redeclared in the current
    scope or statement, effectively eliminating all access to the previous
    instance.  This is almost always a typographical error.  Note that the
    earlier variable will still exist until the end of the scope or until
    all closure referents to it are destroyed.
    
[Thu Mar 17 09:24:07 2011] dslogs.pl: "my" variable $bytes masks earlier declaration in same scope at dslogs.pl line 180.
Uncaught exception from user code:
    [Thu Mar 17 09:24:07 2011] dslogs.pl: 
[Thu Mar 17 09:24:07 2011] dslogs.pl: dslogs.pl [options] log1, log2, ..
[Thu Mar 17 09:24:07 2011] dslogs.pl: 
[Thu Mar 17 09:24:07 2011] dslogs.pl: where:
[Thu Mar 17 09:24:07 2011] dslogs.pl: --domain      the domain name of the site (as in mydomain.com)
[Thu Mar 17 09:24:07 2011] dslogs.pl: --history     the file to store the date cursors for logs
[Thu Mar 17 09:24:07 2011] dslogs.pl: --ignore      a |-separated list of extensions to ignore (i.e gif|jpg)
[Thu Mar 17 09:24:07 2011] dslogs.pl: --index       the default index filename      
[Thu Mar 17 09:24:07 2011] dslogs.pl: --intref      if present internal referrers will not be ignored
[Thu Mar 17 09:24:07 2011] dslogs.pl: --modified    the file to store the list of modified summaries
[Thu Mar 17 09:24:07 2011] dslogs.pl: --reports     the root of the directory tree for the reports
[Thu Mar 17 09:24:07 2011] dslogs.pl: --overwrite   overwrite old summaries (do not update incrementally)
[Thu Mar 17 09:24:07 2011] dslogs.pl: --zip         the program to use for compression
[Thu Mar 17 09:24:07 2011] dslogs.pl: --unzip       the program to use for decompression
at /usr/local/lib/perl5/5.8.8/CGI/Carp.pm line 379
    CGI::Carp::realdie('[Thu Mar 17 09:24:07 2011] dslogs.pl: \x{a}[Thu Mar 17 09:24:07 2...') called at /usr/local/lib/perl5/5.8.8/CGI/Carp.pm line 475
    CGI::Carp::die('\x{a}dslogs.pl [options] log1, log2, ..\x{a}\x{a}where:\x{a}--domain      the...') called at dslogs.pl line 89

 

 

Maybe you should try looking at line 180.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...