Help for this page

Select Code to Download

Select or download this

while (<DATA>) {
    chomp;
...
    warn "Postmatch: Line $. != $line\n";
}