Help for this page

Select Code to Download

Select or download this

while (<$filename>){
    while (/$id1/g && /$id2/g)
...
        print "$file:$.\n";
    }
}