Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Trouble with PAR & Bleach filter

by Booger (Pilgrim)
on Oct 13, 2004 at 19:50 UTC ( [id://398995]=perlquestion: print w/replies, xml ) Need Help??

Booger has asked for the wisdom of the Perl Monks concerning the following question:

Hello folks:

I'm playing a bit with PAR. Seems like a neat way to distribute an application but I'm having trouble with the Bleach filter.

Whenever I use the Bleach filter on the modules (using the -F option) executing the PAR archive with parl returns the following error message:

MyDir/MyModule.pm did not return a true value at (eval 12) line 54.<br +/> BEGIN failed--compilation aborted at (eval 12) line 75.

This all despite the fact that MyDir/MyModule.pm does infact end with the usual 1;

Any hints or suggestions dear monks? I'm absolutely stumped.


Thanks!

Replies are listed 'Best First'.
Re: Trouble with PAR & Bleach filter
by PodMaster (Abbot) on Oct 13, 2004 at 21:45 UTC
    Any hints or suggestions dear monks? I'm absolutely stumped.
    Have you tried examining the filtered module? I see stuff like $_=<<'';y;\r\n;;d;$_=pack'b*',$_;eval;$@&&die$@ and that is not going to return a true value. Here's my version of PAR::Filter::Bleach
    sub apply { my $ref = $_[1]; $$ref = unpack("b*", $$ref); $$ref =~ tr/01/ \t/; $$ref =~ s/(.{9})/$1\n/g; $$ref = q(local $_=<<'';y;\r\n;;d;$_=pack'b*',$_;$_=eval;$@&&die$@ +;$_;)."\n$$ref\n\n"; }

    MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
    I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
    ** The third rule of perl club is a statement of fact: pod is sexy.

      I've somewhat taken over maintenance of PAR from Audrey. Thus I'm trying to work my way through the rt.cpan.org PAR queue. This bug has been fixed in release 0.91.

      All the best,
      Steffen

      Thanks for the enlightenment, PodMaster!

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://398995]
Approved by jdtoronto
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others perusing the Monastery: (4)
As of 2024-03-19 10:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found