Re: Printing hash of hashes

2004-06-25 Thread Randal L. Schwartz
> "Lrmk" == Lrmk <[EMAIL PROTECTED]> writes: Lrmk> I used this code In a ASP code to display the entire content of hashes Lrmk> I did some changes to neke it pure perl it should be good for your job Instead of the core-module Data::Dumper? Why write your own? -- Randal L. Schwartz - Stone

RE: Printing hash of hashes

2004-06-25 Thread Bob Showalter
LRMK wrote: > if ($hash{$k} =~ m/=HASH/){ if (ref($hash{$k}) eq 'HASH') { perldoc -f ref -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Printing hash of hashes

2004-06-24 Thread LRMK
ix $k\t=\t$hash{$k}\n"; if ($hash{$k} =~ m/=HASH/){ my %th = %{$hash{$k}}; printIt($myfix . "\t", %th); } } } LRMK - Original Message - From: "Daniel Falkenberg" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Thursday, Ju

Re: Printing hash of hashes

2004-06-24 Thread Gunnar Hjalmarsson
Daniel Falkenberg wrote: I need to print my hash of hashes. For example... How can I print that in a readable format. Then I would like to be able to print for example... Simpsons, Lead, homer. Any ideas? http://www.perldoc.com/perl5.8.4/pod/perldsc.html -- Gunnar Hjalmarsson Email: http://www.gu

RE: Printing hash of hashes

2004-06-24 Thread Bob Showalter
Daniel Falkenberg wrote: > Hello All, > > I need to print my hash of hashes. For example... > > %HoH = ( > flintstones => { > lead => "fred", > pal => "barney", > }, > jetsons => { > lead => "george", >

Printing hash of hashes

2004-06-24 Thread Daniel Falkenberg
Hello All, I need to print my hash of hashes. For example... %HoH = ( flintstones => { lead => "fred", pal => "barney", }, jetsons => { lead => "george", wife => "jane",