keys of hash of hashes

[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'
                      },
          'kwam01' => {
                        'Thatched Chalet' => 'Chalet',
                        'Luxury Safari Tent' => 'LuxTnt'
                      },

I basically want just:

Luxury, Thatched Chalet', Luxury Safari Tent etc.

If anyone would could assist me, I would be most grateful.

Kind Regards
Brent Clark

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>