Re^2: Felling a tree JAPH

Interesting. 5.8.9, Windows.

$ perl 20130830.japh.pl
Just another Perl hacker,
[download]

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

Replies are listed 'Best First'.
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 GC’d is unspecified.	[reply] [d/l]
Re^4: Felling a tree JAPH by MidLifeXis (Monsignor) 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	[reply]
Re^5: Felling a tree JAPH by choroba (Cardinal) on Sep 04, 2013 at 12:12 UTC
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,';` [download] Update: Does not work in a different version. Ignore. لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ	[reply] [d/l]
Re^6: Felling a tree JAPH by MidLifeXis (Monsignor) on Sep 04, 2013 at 12:19 UTC