| Subject: | [Fwd: [Fwd: Problem with PAR, autouse, and Linux 32/64?]] |
| Date: | Fri, 17 Feb 2006 15:02:12 +0100 |
| To: | bug-par [...] rt.cpan.org |
| From: | Philippe Schaffnit <P.Schaffnit [...] access.rwth-aachen.de> |
| Subject: | [Fwd: Problem with PAR, autouse, and Linux 32/64?] |
| Date: | Fri, 17 Feb 2006 14:55:10 +0100 |
| To: | par [...] perl.org |
| From: | Philippe Schaffnit <P.Schaffnit [...] access.rwth-aachen.de> |
Hi!
I got some further hints (via perlbug): it does seem that the resulting
archive is not fully self-contained and relies on the local perl having
an "autouse.pm": is this the way it's meant to be?
Thanks!
Philippe
PS: don't take my word for it, just try pp Hello_World_Autouse.pl -o
Test ; strace ./Test | & grep "autouse.pm"
PPS: I'm using what I believe to be the newest of everything (Perl
5.8.8, and PAR 0.91)
Philippe Schaffnit wrote:
Show quoted text
>
> Hi!
>
> I've just hit something which I find quite surprising: some standalone
> par-archives fail as soon as I use "autouse"....
>
> This happens only in a specific configuration: I create the archive on
> 32-bit Linux machine and try to run it on a 64-bit (Linux) machine. I do
> not know whether this has only to do with this 32/64 bit difference, but
> it fails on two different 64-bit machines. I am nevertheless sure that
> this strongly linked to "autouse", as turning it in a "plain" "use"
> results in fully functional archives!
>
> I could very well be missing something very obvious, but... I'd like to
> know...
>
> Does anyone have any idea about this?
>
> Thanks!
>
> Philippe
>
> PS: the error message I get (with "autouse"):
> Can't locate autouse.pm in @INC (@INC contains: [...] .) at
> script/Hello_World_Autouse.pl line 8.
> BEGIN failed--compilation aborted at script/Hello_World_Autouse.pl line
> 8.
>
> PPS: the script I use (in "autouse mode"):
> #!/bin/perl -W
> #
> #
> use strict;
> use FindBin;
> use lib $FindBin::RealBin;
> #
> use autouse "Hello_World" => qw(Hello_World);
> # use Hello_World;
> #
> #
> &Hello_World;
> #
> #
> __END__
>
> PPPS: the module:
> #
> package Hello_World;
> use Exporter;
> use vars qw(@ISA @EXPORT);
> @ISA = qw(Exporter);
> @EXPORT= qw(&Hello_World);
> #
> use strict;
> #
> sub Hello_World {
> print "\nHello world!\n\n";
> };
> #
> 1;
> #
> __END__