>Number: 4500 >Category: general >Synopsis: apache configured with 'embedded perl' does not find >subroutine. >Confidential: no >Severity: non-critical >Priority: medium >Responsible: apache >State: open >Class: sw-bug >Submitter-Id: apache >Arrival-Date: Mon May 31 07:50:00 PDT 1999 >Last-Modified: >Originator: [EMAIL PROTECTED] >Organization: apache >Release: 1.3.4 >Environment: suse linux 6.1 >Description: I think I found something like a bug in 'embedded Perl' in apache 1.3.4 that came with my suse 6.1 distribution:
When calling /cgi-bin/test.pl from Netscape about 10 times I get an internal server error in 70% of the calls. The other 30% work fine. Apache or Perl do not find a subroutine. The httpd.error_log message: httpd: [Mon May 31 16:17:10 1999] [error] Undefined subroutine &Apache::ROOT::cgi_2dbin::ihtmlctrl_2epl::OUTFILE called at /usr/local/httpd/cgi-bin/test.pl line 18. After -disbling- the following lines in httpd.conf <Location /cgi-bin> AddHandler perl-script .pl PerlHandler Apache::Registry PerlSendHeader On Options +ExecCGI </Location> everything worked well. /cgi-bin/test.pl: ----------------- #!/usr/bin/perl require "httpdio.pl"; &OUTFILE("test.pl", 0, 0, 0); httpdio.pl: ----------- # Syntax: &OUTFILE( $Dateiname, $p1 ,$p2, $zeile) # bei $p1 = 0 wird kein "Content-type: text/html\n\n" ausgegeben, # bei $p1 = 1 schon # # bei $p2 = n wird an n ter Zeile $zeile ausgegeben. # sub OUTFILE { my $z = 0; if ( @_ > 0 ) { open( FILE, $_[0] ); if ( $_[1] == 1 ) { print "Content-type: text/html\n\n" } if ( $_[2] > 0 ) { while(defined($i = <FILE>)) { $z++; if ($z == $_[2]) { print $_[3]; print $i; } else { print $i } } } else { while(defined($i = <FILE>)) { print $i } } close(FILE); } } 1; >How-To-Repeat: >Fix: Diabling embedded perl >Audit-Trail: >Unformatted: [In order for any reply to be added to the PR database, you need] [to include <[EMAIL PROTECTED]> in the Cc line and make sure the] [subject line starts with the report component and number, with ] [or without any 'Re:' prefixes (such as "general/1098:" or ] ["Re: general/1098:"). If the subject doesn't match this ] [pattern, your message will be misfiled and ignored. The ] ["apbugs" address is not added to the Cc line of messages from ] [the database automatically because of the potential for mail ] [loops. If you do not include this Cc, your reply may be ig- ] [nored unless you are responding to an explicit request from a ] [developer. Reply only with text; DO NOT SEND ATTACHMENTS! ]