Hello,

I ran an old pp test. I don't know why, I just did. Anyway, if fails as shown below. It has been so long I do not know if the test ever worked, or if it ever failed. Perhaps this is an Archive::Zip::MemberRead problem. I don't need this to work myself, but, if there is a problem it should be looked into.

ppm shows that I have Archive::Zip version 1.18 under "perl" and version 1.16 under "site". I don't know which version pp would use. Anyone out there know how the question of which to use is decided?

I am using  perl, v5.8.8
$PAR::VERSION = '0.960';

C:\>type aa_text_file.txt
     line_1
     line_2
     line_3
------------begin paste of a_test.pl
#!/usr/bin/perl -w
# File: a_test.pl
#############
# Create with
#   pp -o a_test.exe -a "C:\\aa_text_file.txt" a_test.pl
# where C:\\aa_text_file.txt contains
#      line_1
#      line_2
#      line_3
#############

use PAR;
use Archive::Zip::MemberRead;

use strict;

my $messages_file = "C:\\aa_text_file.txt";

print ("msg202: par LibCache is ", $PAR::LibCache{$0}, "\n");

my $fh = new Archive::Zip::MemberRead($PAR::LibCache{$0}, $messages_file);
my $line;

while (defined($line = $fh->getline())) {
 print $line;
}
$fh->close();

------------end paste of a_test.pl

C:\>pp -o a_test.exe -a C:\aa_text_file.txt a_test.pl
Set up gcc environment - 3.4.2 (mingw-special)

C:\>a_test.exe
error: member not found
at -e line 171
msg202: par LibCache is Archive::Zip::Archive=HASH(0xa4e8a4)
Can't call method "readChunk" on an undefined value at Archive/Zip/MemberRead.pm line 201.

----------another try using quotes and forward slash
C:\>pp -o a_test.exe -a "C:/aa_text_file.txt" a_test.pl
Set up gcc environment - 3.4.2 (mingw-special)

C:\>a_test.exe
msg202: par LibCache is Archive::Zip::Archive=HASH(0xa4e8a4)
Can't call method "readChunk" on an undefined value at Archive/Zip/MemberRead.pm line 201.


Reply via email to