I'm not sure I understand the question. Do you want to print the datastructure itself, or the data it contains? If you want to print a representation of the datastructure, use Data::Dumper:

use Data::Dumper;
my $structure = [ 'complex', { data => 'structure' } ];
print Dumper($structure);
[download]