develooper Front page | perl.perl5.porters | Postings from March 2001

Bug in Storable or in Perl?

Thread Next
Raphael Manfredi
March 28, 2001 13:42
Bug in Storable or in Perl?
Message ID:
I have been reported a problem with Storable on FreeBSD with the
following test script:

     1  use Storable qw(freeze);
     3  package FOO;
     5  sub STORABLE_freeze {
     6      my ($self, $cloning) = @_;
     7      die "in STORABLE_freeze";
     8  }
    10  package main;
    12  my $foo = bless {}, 'FOO';
    13  eval { freeze($foo) };
    14  print "error = '$@'";
    15  freeze($foo);

When run on my Linux machine, it correctly produces:

    error = 'In STORABLE_freeze at store-die line 7, at store-die line 13
    In STORABLE_freeze at store-die line 7, at store-die line 15

However, when run on FreeBSD, it says:

    error =  at - line 13
    in STORABLE_freeze at - line 7, at - line 15

This is with perl 5.005_03.

I have not access to a FreeBSD platform, so I can't debug this myself.
I'm going to add this test to Storable's regression test suite, but
of course, before doing that, I would like to determine the proper
cause of the bug.

Anyone can give me SSH access to a FreeBSD platform with perl 5.005_03
and Storable-1.0.11?  I can use later perls if they also exhibit the



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