Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

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/ 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/ does infact end with the usual 1;

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


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 PAR queue. This bug has been fixed in release 0.91.

      All the best,

      Thanks for the enlightenment, PodMaster!

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (11)
As of 2016-08-30 15:44 GMT
Find Nodes?
    Voting Booth?
    The best thing I ever won in a lottery was:

    Results (419 votes). Check out past polls.