Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^3: Felling a tree JAPH

by Grimy (Pilgrim)
on Sep 04, 2013 at 07:49 UTC ( #1052240=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Felling a tree JAPH
in thread Felling a tree JAPH

For a given version, I get a consistent result. I reckon the discrepancies between different version are due to internal changes to the GC.

Relying on DESTROY is problematic, because the order in which thingies are GCd is unspecified.


Comment on Re^3: Felling a tree JAPH
Download Code
Re^4: Felling a tree JAPH
by MidLifeXis (Prior) on Sep 04, 2013 at 11:53 UTC

    That is true. Since they are consistent per version (I wonder if per platform makes any difference), I should see if I can reorder the data to make it work out on each :-)

    --MidLifeXis

      What about making the letters depend on the following one?
      sub DESTROY { print $_[0][0] } $p = bless [$_, $p] for reverse split //, 'Just another Perl hacker,';
      Update: Does not work in a different version. Ignore.
      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

        Sounds very similar to the concept behind Destructive JAPH. I wonder if it would help solve the ordering issue on the destroy.

        These aren't really obfuscated, as much as exploring some dark (and some not so dark) corners of the language. I wonder if there is a more appropriate place for these, just so I don't get drawn into obfuscating them and masking the real thing I am playing with.

        --MidLifeXis

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1052240]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (7)
As of 2014-11-23 03:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (128 votes), past polls