http://www.perlmonks.org?node_id=270040


in reply to Re: Unlocking the Dark Mysteries of Acme::Bleach
in thread Unlocking the Dark Mysteries of Acme::Bleach

or doesn't begin with $tie (a sequence of 8 tabs)

Actually if you look closely its actually space-tab x 8. :-) I made the same mistake at first too. Its kinda cute because it represents '01' x 8. Which is longer than any of the subsequent encoded lines, which are all at most 9 chars + /n.

my $tie = " \t"x8;

Locally change the __WARN__ handler to dirty() which returns true if a warning matches non-whitespace.

The point is why though. I beleive the intention is suppress any warnings generated by the following code, regardless as to whether it actually includes a use warnings or what not. Of course if __WARN__ is overriden later theres a problem.. :-)


---
demerphq

<Elian> And I do take a kind of perverse pleasure in having an OO assembly language...

Replies are listed 'Best First'.
Re^2: Unlocking the Dark Mysteries of Acme::Bleach
by Aristotle (Chancellor) on Jun 30, 2003 at 23:17 UTC
    The return value of a signal handler is insignificant. Since the function doesn't have any side effects, he's effectively just ignoring warnings. It's almost obvious he's simply doing it for (Perl) poetic value.

    Makeshifts last the longest.