Help for this page

Select Code to Download

Select or download this
```
1,2
1,3
...
2,3
2,5
2,5
```

Select or download this

  local %DATAHASH;
  open (DATA, 'foo.csv');
...
      my @datarow=split(/,/, $_);
      push(@{$DATAHASH{$datarow[0]}}, ($datarow[1]));
  }