Re: Array of Hashes

Thanks for your help, I will look carefully at both of your comments. cheers From: John W. Krahn To: Perl Beginners Sent: Friday, 13 April 2012 6:08 AM Subject: Re: Array of Hashes Rob Dixon wrote: > > Hi Paul and welcome to the list. > > I c

Re: Array of Hashes

Rob Dixon wrote: Hi Paul and welcome to the list. I can see a few things wrong with your code, but I have only a Windows machine so cannot test any changes I am suggestion so please beware. The reason you get the marked line in your output is because that is what you have written. This loop o

Re: Array of Hashes

On 12/04/2012 12:48, Paul.G wrote: Hi All New to this group, so hello to everybody. I am currently working on creating a Array of Hashes, note it is a work in progress. I appear to be getting some corruption when inputting data with the pvdisplay, I can't see why this is the case. I have put so

Re: Array of Hashes - problem solved

Hi All I have solved the problem, I would be interested in any comments however on this script. Positive and negative comments are welcome. #!/usr/bin/perl use strict; use warnings; my @vggroup; my @PV; my $PV=0; my $Extents; my $AllocatedPE; my $rec = {}; my $href; my $extent; open(CMD,"/u

Re: Array of hashes

[EMAIL PROTECTED] wrote: Hi All Can anyone tell me whether there is any way for declaring an array of hashes similar to creating array of structure variables in C programming? There is a module, Class::Struct, that might be what you want. See `perldoc Class:Struct`. However, I would simply

Re: array of hashes of arrays...

On Monday 15 August 2005 22.47, Ryan Perry wrote: > How can I do this correctly? > > > foreach my $col (@columns) { >my %{$col} = ( > string => "$col", > number => [EMAIL PROTECTED] > ); >push

RE: array of hashes of arrays...

Ryan Perry wrote: : How can I do this correctly? : : : foreach my $col (@columns) { :my %{$col} = ( : string => "$col", : number => [EMAIL PROTECTED] : ); :push (@

Re: array of hashes of arrays...

The Ghost wrote: How can I do this correctly? foreach my $col (@columns) { my %{$col} = ( # <-- I have a problem here, I want the hash to be named whatever "$col" is string => "$col", number => [EMAIL PROTECTED]

Re: array of hashes of arrays...

On Mon, Aug 15, 2005 at 04:08:22PM -0500, The Ghost wrote: > How can I do this correctly? > > > foreach my $col (@columns) { > my %{$col} = ( # <-- I have a problem here, I want > the hash to be named whatever "$col" is > string => "$col", >

Re: Array of hashes

Jeff 'japhy' Pinyan wrote: Here you want to do: foreach my $key (keys %$result) { since each element in @results is a hash-ref, and $result is an element from @results, you need to gets its keys. Since $result is a hash reference, you need to write %$result to get at the hash. I'v

Re: Array of hashes

On Jul 13, The Ghost said: foreach my $col (keys %{$ref}) { $results[$x]{$col}=$ref->{$col}; } $x++;} The @results array holds hash references... foreach my $result (@results) { foreach my $key (keys {$results[$x]}) { Here you want to do: foreach my $key (ke

Re: Array of hashes

The Ghost wrote: How can I get the information out of the hashes? sub somthing { while (my $ref = $sth->fetchrow_hashref()) { foreach my $col (keys %{$ref}) { $results[$x]{$col}=$ref->{$col}; } $x++;} return (@results); } Then later: (I don't understand this part

RE: array of hashes looping prob

From: Graeme McLaren wrote: : Ok everyone I got it: : : for my $a (@result){ : : for my $h (keys %$a){ : : print "$h = $a->{$h} "; : } : } Avoid using $a and $b as variables. They are used by 'sort' and treated special by perl. Use descriptive var

RE: array of hashes looping prob

Ok everyone I got it: for my $a (@result){ for my $h (keys %$a){ print "$h = $a->{$h} "; } } Cheers, G :) From: "Graeme McLaren" <[EMAIL PROTECTED]> To: [EMAIL PROTECTED] Subject: array of hashes looping prob Date: Mon, 04 Oct 2004 10:27:37 +0100 MIME-Version: 1.0 X-Originating-IP:

Re: Array of Hashes

assign the reference of the hash. --- Simon Tomlinson <[EMAIL PROTECTED]> wrote: > Hi > > I want to put a hash into each element of an array. > I do it like the following bit of code. When I > iterate round my hash before putting it in the array > of the hash values/keys are there. However, w

Re: Array of Hashes

Simon Tomlinson wrote: > Hi > > I want to put a hash into each element of an array. I do it like the > following bit of code. When I iterate round my hash before putting it in > the array of the hash values/keys are there. However, when I iterate > through the hash after putting it in the arr

RE: Array of Hashes

ROTECTED]> <[EMAIL PROTECTED]cc: .com> Su

RE: Array of Hashes

On Wed, 18 Sep 2002, Simon Tomlinson wrote: > > > Apologies, that was bad typing in my email. I rearrange the algorithm to make it >easier to read. Here is my exact source and the exact output. Even without the >space there, it still doesn't work!! > > Any ideas? > Simon. > > > sub getE

RE: Array of Hashes

cc:

RE: Array of Hashes

cc: Subject: RE: Array of Hashes

RE: Array of Hashes

you have a space that shouldn't be there: > print "THIS DOESN'T WORK: $key $newHash {$key}\n"; ^ should be: print "THIS DOESN'T WORK: $key $newHash{$key}\n"; > -Original Message- > From: Simon Tomlinson [mailto:[EMAIL PROT

Re: array of hashes

On Wed, Oct 31, 2001 at 09:53:58AM -0800, Sofia wrote: [snip] > %systems = ( >sgi => ["sgi1", "sgi2"], >linux => ["linux1", "linux2"], >dec => ["dec1", "dec2"] > }; [snip] > %default = ( > sgi => ["sgi-help","/bin/csh","/home"], > linux => > ["someaddress-help","/bin/bas

Re: array of hashes

On Oct 31, Sofia said: >So in the example that Daniel shows, how would I get >(reference) the value for the shell path for the sgi >system? Using the data structure: >> %systems = ( >> sgi => { defaults => >> ["sgi-help","/bin/csh","/home"], >> machines => ["sgi1", "sgi2

Re: array of hashes

So in the example that Daniel shows, how would I get (reference) the value for the shell path for the sgi system? --- Daniel Gardner <[EMAIL PROTECTED]> wrote: > S> I have a systems hash that contains the type of > system > S> as keys and the name of the machines as values: > > S> %systems = (

Re: array of hashes

Daniel, I am recreating the systems password, group and shadow (when applicable) files. So if the script is run on an sgi system, for example, the files location is /etc. If it is run on a linux machine is /usr/local/system. If there are new users, create new directories for them: for sgis on

Re: array of hashes

S> I have a systems hash that contains the type of system S> as keys and the name of the machines as values: S> %systems = ( S>sgi => ["sgi1", "sgi2"], S>linux => ["linux1", "linux2"], S>dec => ["dec1", "dec2"] S> }; S> Now, each type of system has default values like an S> email

Re: Array of Hashes?

On Sep 24, Pete Sergeant said: >@hosts = sort { %{$a}->{'name'} <=> %{$b}->{'name'} } @hosts; That (%{$x}->{key}) works for an ugly reason. It's probably a bug. @hosts = sort { $a->{name} cmp $b->{name} } @hosts; -- Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~jap

Re: Array of Hashes?

Jonathan Batchelor writes: > I have a data structure similar to the following: > > @hosts = ( list of hashes like below ... ); > %hosts = ( name => "hostname", >ipaddr => "www.xxx.yyy.zzz", >location => "location" > ); > > How can produce a sorted list of the ha

Re: Array of Hashes?

> @hosts = ( list of hashes like below ... ); > %hosts = ( name => "hostname", > ipaddr => "www.xxx.yyy.zzz", > location => "location" >); > > How can produce a sorted list of the hashes based on the hostname and then > access each hash to print the details. > @hosts = sort { %{$a}

Re: Array of Hashes?

You can do a schwartzian transform @hosts = (blah..blah..blah); my @sorted = map { $_->[0] } sort { $a->[1] cmp $b->[1] } map { [$_,$_->{name} } @hosts; foreach my $h (@sorted) { foreac