Re: How to Update Hash to Itself Recursively

2005-09-16 Thread Jeff 'japhy' Pinyan
On Sep 16, Wijaya Edward said: But how come my code below doesn't give the intended result as below? How can I go about it? Simply put, because the 'foreach my $line (keys %line)' creates the list of keys ahead of time. Here's one way to achieve your goal: my @stack = qw( A B C ); my @

Re: keys of hash of hashes

2005-09-16 Thread Jeff 'japhy' Pinyan
On Sep 16, Brent Clark said: foreach my $fileName ( keys %$ref_allTariffData ){ print keys $ref_allTariffData{$fileName}; } The keys() function takes a hash. You used it properly the FIRST time, but not the second. And, $hash{$key} means that you have a hash called '%hash', where

How to Update Hash to Itself Recursively

2005-09-16 Thread Wijaya Edward
Dear Guru, The simple example below is by the process of "appending" the elem of @tojoin and %line. My code below attempt to update the hash recursively. Keep processing it until string "AYW". The appending process is for simple illustration. Actually there is other more process to it. But my

Perl: Mail 2 text utility

2005-09-16 Thread Ram
Is there any perl ( or any other ) utility that can extract just the text or html part of a message and return a string Thanks Ram -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: keys of hash of hashes

2005-09-16 Thread Jeff Pan
maybe u want this: foreach my $fileName ( keys %$ref_allTariffData ){ foreach my $name ( keys %{$ref_allTariffData->{$fileName}} ){ print $name,";"; } } On Fri, 16 Sep 2005 10:33:58 +0200, "Brent Clark" <[EMAIL PROTECTED]> said: > Hi list > > I hav

keys of hash of hashes

2005-09-16 Thread Brent Clark
Hi list I have a hash that im trying to get the keys. foreach my $fileName ( keys %$ref_allTariffData ){ print keys $ref_allTariffData{$fileName}; } My Data Dumper: $VAR1 = { 'sham02' => { 'Luxury' => 'LuxRm' }, 'kw