my $root =
[
[
['a','b'],
[
[[['c','d'],[['e','f'],'g']],[['h',['i',['j','k']]],'l']],
[['m',['n',['o','p']]],'q']
]
],
[
[
[
[[[['r',[['s','t'],'u']],'v'],['w','x']],[['y','z'],]],
[
['1',[['2','3'],[['4','5'],[['6',['7',['8','9']]],['A','B']]]]],
[[['C','D'],['E','F']],'G']
]
],
[
[
[['H',[['I',['J','K']],'L']],[['M','N'],'O']],
['P',[[[['Q','R'],['S','T']],'U'],['V','W']]]
],
['X','Y']
]
],'Z'
]
]
;
####
C:\test>anonBinTreeDumper.pl
_____________________________/\______________________________________________________________________________________
_/\___________________ ___________________________________/\
/\ _________/\_______ _______________________________/\_______________________________ Z
a b _____/\_______ _____/\ ____/\_____________________ _______________/\_
_/\___ _____/\ /\_ q ___/\ ___________________/\_______ _____/\_ /\
/\ _/\ /\_ l m /\_ _/\_ _/ /\___ ___/\ _______/\___ /\_________ X Y
c d /\ g h /\_ n /\ _____/\ //\ 1 _/\___ _/\_ G /\_____ _/\ P _/\_
e f i /\ o p /\___ v wyxz /\ _/\_______ /\ /\ H ___/\ /\ O ___/\ /\
j k r _/\ 2 3 /\ _____/\_ C D E F /\_ L M N _/\_ U V W
/\ u 4 5 /\_ /\ I /\ /\ /\
s t 6 /\_ A B J K Q R S T
7 /\
8 9
##
##
my $root =
[
[
['a','b'],
[
[[['c','d'],[['e','f'],'g']],[['h',['i',['j','k']]],'l']],
[['m',['n',['o','p']]],'q']
]
],
[
[
[
[[[['r',[['s','t'],'u']],'v'],['w','x']],[['y','z']]],
[
['1',[['2','3'],[['4','5'],[['6',['7',['8','9']]],['A','B']]]]],
[[['C','D'],['E','F']],'G']
]
],
[
[
[['H',[['I',['J','K']],'L']],[['M','N'],'O']],
['P',[[[['Q','R'],['S','T']],'U'],['V','W']]]
],
['X','Y']
]
],'Z'
]
]
;
##
##
C:\test>anonBinTreeDumper.pl
_____________________________/\______________________________________________________________________________________
_/\___________________ ___________________________________/\
/\ _________/\_______ _______________________________/\_______________________________ Z
a b _____/\_______ _____/\ ____/\_____________________ _______________/\_
_/\___ _____/\ /\_ q ___/\ ___________________/\_______ _____/\_ /\
/\ _/\ /\_ l m /\_ _/\_ _/ /\___ ___/\ _______/\___ /\_________ X Y
c d /\ g h /\_ n /\ _____/\ //\ 1 _/\___ _/\_ G /\_____ _/\ P _/\_
e f i /\ o p /\___ v wyxz /\ _/\_______ /\ /\ H ___/\ /\ O ___/\ /\
j k r _/\ 2 3 /\ _____/\_ C D E F /\_ L M N _/\_ U V W
/\ u 4 5 /\_ /\ I /\ /\ /\
s t 6 /\_ A B J K Q R S T
7 /\
8 9
##
##
C:\test>perl \perl64\site\lib\Tree\Dump.pm
_____________________________________________________________________________________
_____________/ \___________________
_/ \_________ ___________________________________________/ \
/ \ _____/ \_____ _______/ \_______________ Z
a b ___/ \_____ _/ \ _____/ \_____________________ ___/ \_
_/ \_ _/ \ / \_ q _/ \ ___/ \___ _______/ \_________ / \
/ \ _/ \ / \_ l m / \_ ___/ \_ _/ / \___ _/ \ ___/ \_ / \_ X Y
c d / \ g h / \_ n / \ ___/ \ / \ / \ 1 _/ \___ _/ \_ G / \___ _/ \ P ___/ \_
e f i / \ o p / \_ v w x y z / \ _/ \_____ / \ / \ H _/ \ / \ O _/ \ / \
j k r _/ \ 2 3 / \ _/ \_ C D E F / \_ L M N _/ \_ U V W
/ \ u 4 5 / \_ / \ I / \ / \ / \
s t 6 / \_ A B J K Q R S T
7 / \
8 9