develooper Front page | perl.perl5.porters | Postings from December 2004

[perl #33148] Found a problem with 1.43 Perl 5.8.0

Thread Previous | Thread Next
Benjamin Elbirt
December 21, 2004 14:39
[perl #33148] Found a problem with 1.43 Perl 5.8.0
Message ID:
# New Ticket Created by  "Benjamin Elbirt" 
# Please include the string:  [perl #33148]
# in the subject line of all future correspondence about this issue. 
# <URL: >

This may also exist in later versions:
I am using CGI::SSI with Apache/Mod_Perl 1.33/1.29 and I got this error:
Cannot find current script '/dev/null' at /usr/lib/perl5/5.8.0/
line 180
After much painstaking searching I figure it out
Line 153:
croak("Cannot find current script '$0'") unless(-f $script);
Apache loads $script as /dev/null and it thus fails the -f test.
I commented out the line as it fixed the problem and this only happened with
Apache/Mod_perl (command line SSI worked fine)
I'm wondering if there is a way to catch the Apache usage and ignore the -f
or do a different check.

Benjamin Elbirt
Perl Programmer, 8 years

Thread Previous | Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About