Select Code to Download

my %statistics = (
  1 => [ "foo", "bar" ],
  2 => [ "baz", "bletch" ],
  3 => [ "quux" ],
);

    # if we havent hit this line yet, add an array 
    # reference to %statistics at this line number.
...
    if (defined $statistics{$line_number} ) {
      push @{ $statistics{$line_number} }, $thisline;
    }