Help for this page

Select Code to Download


  1. or download this
    my @data = ({}) x (3);
    print Dumper \@data;
    
  2. or download this
    $VAR1 = [
              {},
              $VAR1->[0],
              $VAR1->[0]
            ];
    
  3. or download this
    $VAR1 = [
              {},
              {},
              {},
            ];
    
  4. or download this
    for (0..2) {
        print $report->{data}->[$_]->{foo}," => ", $report->{data}->[$_]->
    +{bar},"\n";
    }