Select Code to Download

my @all_names = map { {name => $_->{name}} } @{ $data }[1 .. $#$data];

use warnings;
use strict;
...
#print Dumper \@hash_names;

__END__