Select Code to Download

use Data::Dumper;
....
print Dumper \@name;

use Data::Dump qw(pp);
.....
print pp \@name;