ref / hash problem

Hi list

I have my data as so (Thanks to Data::Dumper)

'Grac01' => {
                        'StndRm' => 'Standard Room',
                        'Suite' => 'Suite',
                        'Pent' => 'Penthouse'
                      },

My code is as so.

foreach my $roomCode ( keys %{ $ref_hash->{$fileName} }){ # This works 100%

	foreach be( keys %{ $ref_hash->{$fileName}->{$roomCode} } ){		# Not working
		print "Ok HERE IT IS $_ <br />\n";
	}


I cant seem to get my second foreach to display the data of

	Standard Room, or Suite etc.

If anyone would be kind to help me, it would be most appreciated.

Kind Regards
Brent Clark
.