use Data::Dumper qw/Dumper/;
# dein Array-erstellender Code hier...
print Dumper(\@array);