How to create an array of hashes return form a subroutine

gepebril69 has asked for the wisdom of the Perl Monks concerning the following question:

Hi there, I like to create an array of hashes from returned hashes from a subroutine. I know how to create an array of hashes by e.g.:

my @NameArray;

$NameArray[0]{firstname} = "Jan";
$NameArray[0]{famname}   = "Jansen";
$NameArray[0]{street}    = "ParkAvenue";
[download]

But what is I get an hash returned from a subroutines with new firstname, famname, street results, like

sub addnaw
{ # In real a subroutine which collects a specific line
  # from a file

  my %value
  $value{firstname} = "John";
  $value{famname}   = "Johnson";
  $value{street}    = "Bellpark";
  return %values;
}
[download]

And I would like to add it directly to that array like


my @NameArray;

for ($i; $i < $endvalue; $i++)
{ NameArray[$i] = addnaw(); # Fault code
}
[download]

Which does not work, is it possible, or do I have to use more code.

Comment on How to create an array of hashes return form a subroutine Select or Download Code

Replies are listed 'Best First'.
Re: How to create an array of hashes return form a subroutine by roboticus (Chancellor) on Mar 26, 2012 at 15:15 UTC
gepebril69: Return a hash reference, which you can put in your array. See perldsc `sub addnaw { return { # anonymous hash reference a=>'foo', b=>'bar' } }` [download] ...roboticus When your only tool is a hammer, all problems look like your thumb.	[reply] [d/l]
Re: How to create an array of hashes return form a subroutine by tangent (Parson) on Mar 26, 2012 at 15:16 UTC
You need to store a reference to each hash in the array, try this: `my @NameArray; my $endvalue = 5; for (my $i = 0; $i < $endvalue; $i++) { $NameArray[$i] = addnew($i); } for my $hash_ref (@NameArray) { print "$hash_ref->{firstname} $hash_ref->{famname}\n"; } sub addnew { my $index = shift; my %value; $value{firstname} = "John $index"; $value{famname} = "Johnson $index"; $value{street} = "Bellpark $index"; return \%value; # return a reference to the hash }` [download]	[reply] [d/l]
Re^2: How to create an array of hashes return form a subroutine by gepebril69 (Scribe) on Mar 26, 2012 at 16:20 UTC
@Tangent, Thanks very much, so I was close, just missed an '\' @All others thanks for the help as well.	[reply]
Re: How to create an array of hashes return form a subroutine by JavaFan (Canon) on Mar 26, 2012 at 15:36 UTC
`for (my $i = 0; $i < $endvalue; $i++) { $NameArray[$i] = {addnaw()}; }` [download] Although it may be easier to have `addnaw()` return a hashref.	[reply] [d/l] [select]
Re: How to create an array of hashes return form a subroutine by stevieb (Canon) on Mar 26, 2012 at 15:31 UTC
in haste, I mis-read the problem.	[reply]