Select Code to Download

#!perl -l
use strict;
...
$a->{child1}:ARRAY
$a->{child1}{child2}:HASH
@{$a->{child1}}:28004977