# Create a reference to an anonymous hash with the data

my $my_data = { names => $some_data };
#my $my_data_ref = \%my_data;

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

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