Select Code to Download

open IN, '<', $filename or die "...";
$parser->filter(\*IN);

open my $IN, '<', $filename or die "...";
$parser->filter($IN);

$parser->filterfile($filename);