Help for this page

Select Code to Download


  1. or download this
    my @cis = $$range[1]-1 .. $$range[3]-1;
return [ map { sub{\@_}->(@{$$data[$_]}[@cis]) }
    $$range[0]-1 .. $$range[2]-1 ]
  2. or download this
    my @column_indices = $col1 .. $colN;
return [
...
        sub{ \@_ }->( @{ $$data[$_] }[@column_indices] )
    } $row1 .. $rowN
]
  3. or download this
    my @row_indices    = $row1 .. $rowN;
my @column_indices = $col1 .. $colN;
...
    push @row_subset, $column_subset_aliases;
}
return \@row_subset;