in reply to Re: Beautiful recursive print
in thread Beautiful recursive print

Recursive data structures are tricky. In fact, it appears that even Dump does not always get it exactly right. (Refer to Choroba's answer to my my question Marshalling Data.) Sorry, I was to lazy to write the bug report that he recommended.
Bill

Replies are listed 'Best First'.
Re^3: Beautiful recursive print
by choroba (Cardinal) on Mar 20, 2017 at 09:04 UTC
    I did, but it seems the bug won't be fixed.

    ($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom