Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Trouble with PAR & Bleach filter

by Booger (Pilgrim)
on Oct 13, 2004 at 19:50 UTC ( #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!

Comment on Trouble with PAR & Bleach filter
Download Code
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.

      Thanks for the enlightenment, PodMaster!

      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

Log In?
Username:
Password:

What's my password?
Create A New User
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? | Other CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2014-09-20 01:40 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (151 votes), past polls