...
# Create a hash with the data

my %my_data = ( names => $some_data);
my $my_data_ref = \%my_data;

my @all_names = split/\n/, ${ $my_data_ref } { names };
 
 foreach my $rows (@all_names){

   print $rows."\n";
   
 }
 ...