I've enclosed two simple fixes for 2.35 to work with perl 5.7.x and
5.8.x. First one have caused failure in "t/cache.t" and second one is
needed for nested Class::Struct declaration.
Regards,
Manabu Higashida
[EMAIL PROTECTED]
diff -c -r Apache-ASP-2.35/ASP.pm Apache-ASP-2.35.modified/ASP.pm
*** Apache-ASP-2.35/ASP.pm Wed May 22 03:57:48 2002
--- Apache-ASP-2.35.modified/ASP.pm Sun Jun 30 22:18:00 2002
***************
*** 1216,1222 ****
local *READFILE;
open(READFILE, $file) || $self->Error("can't open file $file for reading");
local $/ = undef;
! my $data .= <READFILE>;
close READFILE;
$data;
--- 1216,1222 ----
local *READFILE;
open(READFILE, $file) || $self->Error("can't open file $file for reading");
local $/ = undef;
! my $data = <READFILE>;
close READFILE;
$data;
diff -c -r Apache-ASP-2.35/lib/Apache/ASP/CGI.pm
Apache-ASP-2.35.modified/lib/Apache/ASP/CGI.pm
*** Apache-ASP-2.35/lib/Apache/ASP/CGI.pm Tue Apr 23 12:17:48 2002
--- Apache-ASP-2.35.modified/lib/Apache/ASP/CGI.pm Sun Jun 30 22:18:35 2002
***************
*** 78,83 ****
--- 78,84 ----
$self->filename($filename);
$self->header_in('Cookie', $ENV{HTTP_COOKIE});
+ $self->connection(new Apache::ASP::CGI::connection);
$self->connection->remote_ip($ENV{REMOTE_HOST} || $ENV{REMOTE_ADDR} ||
'0.0.0.0');
$self->connection->aborted(0);
# $self->dir_config('Global') || $self->dir_config('Global', '.');
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
