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