Select Code to Download

       $box{$X}{$Y}{$z} =  1;             # DOES work 
#      $box{$X}{$Y}{$z}{'rect'} = 1 ;     # 'works' because it's comme
+nted out
#      $box{$X}{$Y}{$z}{'rect'} = undef ; # see above
       $box{$X}{$Y}{$z}{'text'} = 2;      # refs error

my $z = 1;
$z->{'text'} = 2;

$box{$X}->{$Y}->{$z} = 1;
$box{$X}->{$Y}->{$z}->{'text'} = 2;

$box{$X}{$Y}{$z} =  undef;

       $box{$X}{$Y}{$z}{'text'} = 2;