Help for this page

Select Code to Download

Select or download this

sub filter_line {
  my ($i, $line);
...
  return 0;
}