Re^2: Hash Ref Error

I would do this way:

# 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";
   
 }
 ...
[download]

Comment on Re^2: Hash Ref Error Download Code

Replies are listed 'Best First'.
Re^3: Hash Ref Error by stevieb (Canon) on Sep 15, 2015 at 22:54 UTC
Excellent Maresia! Here's a couple of different ways you can do it. Note that double-quotes automatically 'interpolate' variables (ie. expands variables to their values), so you can even do `"$rows\n";` instead of `$rows."\n"` :) `my %my_data = ( names => $some_data); my $my_data_ref = \%my_data; my @all_names = split /\n/, $my_data_ref->{names}; for (@all_names){ print "$_\n"; } # or even skip creating the @all_names array altogether print "$_\n" for split /\n/, $my_data_ref->{names};` [download] I wouldn't recommend the latter unless you're really just doing something with the extracted information immediately on the spot.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: Hash Ref Error
by stevieb (Canon) on Sep 15, 2015 at 22:54 UTC

Excellent Maresia! Here's a couple of different ways you can do it. Note that double-quotes automatically 'interpolate' variables (ie. expands variables to their values), so you can even do "$rows\n"; instead of $rows."\n" :)

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

my @all_names = split /\n/, $my_data_ref->{names};

for (@all_names){
    print "$_\n";
}

# or even skip creating the @all_names array altogether

print "$_\n" for split /\n/, $my_data_ref->{names};
[download]

I wouldn't recommend the latter unless you're really just doing something with the extracted information immediately on the spot.

[reply]
[d/l]
[select]