Archive::All failure to install

[Owen]

Quite a lot of modules fail to install, this is the latest on my linux
system with Perl 5.8.0.

1. Using CPAN, how can you force an install? and
2. Any suggestions as how I can fix the failed blessing?
The word "bless" doesn't appear in the package and line 85 is the end of
the new subroutine.

TIA

Owen

(rcook@pcug.org.au)

------------------------------------------------------------------


CPAN.pm: Going to build M/MS/MSCHWERN/Archive-Any-0.03.tar.gz

<snip>

PERL_DL_NONLAZY=1 /usr/bin/perl5.8.0 "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/00compile....ok
t/Any..........ok 2/0Attempt to bless into a reference at /usr/lib/perl5/site_perl/5.8.0/Archive/Tar.pm line 85.
# Looks like your test died just after 2.
t/Any..........dubious
Test returned status 255 (wstat 65280, 0xff00)
Scalar found where operator expected at (eval 151) line 1, near "'int' $__val"
(Missing operator before $__val?)
after all the subtests completed successfully
Failed Test Stat Wstat Total Fail Failed List of Failed
--------------------------------------------------------------------
t/Any.t 255 65280 2 0 0.00% ??
Failed 1/2 test scripts, 50.00% okay. 0/5 subtests failed, 100.00% okay.
make: *** [test_dynamic] Error 2
/usr/bin/make test -- NOT OK
Running make install
make test had returned bad status, won't install without force

[Eric Wilhelm]

On Thu, 18 Sep 2003 04:13:37 -0500, Owen wrote:

> Quite a lot of modules fail to install, this is the latest on my linux
> system with Perl 5.8.0.

Same here today.

Going to try some hacking on it now.

--Eric

[Eric Wilhelm]

On Thu, 18 Sep 2003 04:13:37 -0500, Owen wrote:

> ok 2/0Attempt to bless into a reference at
> /usr/lib/perl5/site_perl/5.8.0/Archive/Tar.pm line 85.

for me that is on line 87 (Archive::Tar::VERSION = "1.04")
and the error is:
Can't locate object method "read" via package
"Archive::Tar=HASH(0x81ee8c4)"

looks like this:
my $obj = bless { _data => [ ], _file => 'Unknown' }, shift;

The problem doesn't seem to be in Archive::Any, but I don't see why bless
doesn't seem to be working.

I added the following in Archive::Tar::new()

87 my $thing = shift;
88 my $thing = ref($thing) || $thing;
89 my $obj = bless { _data => [ ], _file => 'Unknown' }, $thing;

This seems to take care of it.

Is this a bug in Archive::Tar ? or is there something funky in
Archive::Any which I am not catching?

--Eric

[Eric Wilhelm]

On Sun, 28 Sep 2003 21:30:08 -0500, Eric Wilhelm wrote:

> 87 my $thing = shift;
> 88 my $thing = ref($thing) || $thing;

sorry, should have made that "mine" only once:

> 87 my $thing = shift;
> 88 $thing = ref($thing) || $thing;