hash slices

[Gerald Host]

I'm using DBI's selectall_hashref with 5 key columns.  I want to display
each row where key col 1 is 'yes' or NULL (undef or '' ?)


                       foreach my $medCategory (keys
%{$href->{'yes'}->{qw('' 'yes')}->{qw('' 'yes')}}) {
                           foreach my $med (keys
%{$href->{qw('yes')}->{qw('' 'yes')}->{qw('' 'yes')}->{$medCategory}}) {
                              foreach my $ID (keys
%{$href->{qw('yes')}->{qw('' 'yes')}->{qw(''
'yes')}->{$medCategory}->{$med}}) {


                                    print qq{ $href->{qw('yes')}->{qw(''
'yes')}->{qw('' 'yes')}->{$medCategory}->{$med}->{$ID}->{ID} };
                                    print qq{ $href->{qw('yes')}->{qw(''
'yes')}->{qw('' 'yes')}->{$medCategory}->{$med}->{$ID}->{Medication} };
             }
        }
   }

This isn't working of course because I don't quite understand the syntax I
need.  Can someone give me a hint?  Thanks!

Ryan