Help for this page

Select Code to Download


  1. or download this
        # is it a range or a single line?
    if ($info =~ /(\d+)-(\d+)/) {
...
    } else {
        $changes{$file} = [$info];
    }
  2. or download this
        if ($info =~ /(\d+)-(\d+)/) {
        $changes{$file} .= " ".join(" ",($1 .. $2))." ";
    } else {
        $changes{$file} .= " $info ";
    }
  3. or download this
        ...
    if (defined $changes{$file}) {
...
        next unless ($changes{$file} =~ / $line /);
    }
    ...