
   my %switch_hash = (
   	    chrdex   => {
	       DEX   => {
		  '01-AUG-02'  => 1,
		  '03-AUG-02'  => 3,
	       }
      	    },
	    uslcgb5e2sm	   =>{
	       Greensboro  => {
		  '4-AUG-02'   => 1,
		  '6-AUG-02'   => 2,
	       }
	    },
	    uslecat25e1	   => {
	       'Atlanta II' => {
		  '1-AUG-02'   => 1,
		  '2-AUG-02'   => 3,
		  '3-AUG-02'   => 1,
		  '4-AUG-02'   => .25,
	       }
	    },
    );

$rhent = \%switch_hash;

##</code><code>##


my @dates = ( keys %{(keys %{(keys %$rhent)})} );

##</code><code>##


Can't use string ("3") as a HASH ref while "strict refs" in use at ./xcl3.pl line 301