SYNOPSIS use PERLANCAR::Tree::Examples qw(gen_sample_data); my $tree = gen_sample_data(size => 'medium1'); DESCRIPTION This distribution can generate sample tree objects of several size (depth + number of nodes) and implementation (hash-based nodes or array-based). I use these example trees for benchmarking or testing in several other distributions. Overview of available sample data # CODE: require PERLANCAR::Tree::Examples; require Text::Head; require Tree::Dump; for my $size ('tiny1', 'small1', 'medium1') { for my $backend ('hash', 'array') { print "=item * size=$size, backend=$backend\n\n"; my $s = Text::Head::head_text(text => Tree::Dump::tdmp(PERLANCAR::Tree::Examples::gen_sample_data(size=>$size, backend=>$backend)), hint=>1, lines=>15); $s =~ s/^/ /gm; print $s, "\n" } } SEE ALSO dump-perlancar-sample-tree (App::DumpPERLANCARSampleTree), a simple CLI to conveniently view the sample data.