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

Re^2: Felling a tree JAPH

by MidLifeXis (Prior)
on Sep 03, 2013 at 20:31 UTC ( #1052176=note: print w/ replies, xml ) Need Help??


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

Interesting. 5.8.9, Windows.

$ perl 20130830.japh.pl Just another Perl hacker,

Do you get the same results every time, or does it change on each run?

Update: s/Win/Windows/ for clarity :-)

--MidLifeXis


Comment on Re^2: Felling a tree JAPH
Download Code
Re^3: Felling a tree JAPH
by Grimy (Pilgrim) on Sep 04, 2013 at 07:49 UTC

    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.

      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.
        لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (7)
As of 2014-12-28 02:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (177 votes), past polls