Help for this page

Select Code to Download


  1. or download this
    for (0..15) {
        $a{'a'}{$_} = 0;
        print scalar %{$a{'a'}}, "\n";
    }
    
  2. or download this
    1/8
    2/8
    ...
    11/16
    12/16
    15/32
    
  3. or download this
    print scalar @{[%{$a{'a'}}]}, "\n";