ок спасиб.
On Nov 23, 2014 4:05 AM, "Nikolay Mishin" <[email protected]> wrote:
> Дорогой MoscowPM
> занимаясь рисованием дерева из элементов
> наткнулся на замечательный модуль
> use Data::TreeDumper;
> print DumpTree($all, 'all') ;
> для отладки он оказался лучше, чем даже
>
> use Data::Printer {
> output => 'stdout',
> hash_separator => ': ',
> return_value => 'pass',
> };
>
> Так, например
>
> use Data::TreeDumper;
> # Create an reference to an array of array references.
> $ref_to_AoA = [
> [ "fred", "barney", "pebbles", "bamm bamm", "dino", ],
> [ "homer", "bart", "marge", "maggie", ],
> [ "george", "jane", "elroy", "judy", ],
> ];
>
> print DumpTree( $ref_to_AoA, 'ref_to_AoA' );
>
> ref_to_AoA
> |- 0 [A1]
> | |- 0 = fred [S2]
> | |- 1 = barney [S3]
> | |- 2 = pebbles [S4]
> | |- 3 = bamm bamm [S5]
> | `- 4 = dino [S6]
> |- 1 [A7]
> | |- 0 = homer [S8]
> | |- 1 = bart [S9]
> | |- 2 = marge [S10]
> | `- 3 = maggie [S11]
> `- 2 [A12]
> |- 0 = george [S13]
> |- 1 = jane [S14]
> |- 2 = elroy [S15]
> `- 3 = judy [S16]
>
> намного нагляднее, чем Data::Dumper
>
>
> выдаст
>
>
>
>
>
> --
> С уважением
> Николай Мишин
>
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
>
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
