Help for this page

Select Code to Download


  1. or download this
    $HoH{"$G_Boardno"}{"$G_ExcepId"}{$G_CauseCode} = "value";
  2. or download this
    $HoH{"$G_Boardno"} //= {};
$HoH{"$G_Boardno"}{"$G_ExcepId"} //= {};
$HoH{"$G_Boardno"}{"$G_ExcepId"}{$G_CauseCode} = "value";
  3. or download this
    >perl -wle"my($x,$y); $y=$x->{k}; print $x;
HASH(0x225278)

>perl -wle"my($x,$y); $y=$x->[0]; print $x;
ARRAY(0x225278)