Help for this page

Select Code to Download

Select or download this

while (<FF>) {
     next unless /XXXX/;
...
     print $_ ;

}

Select or download this

while (<FF>) {
     next unless /XXXX/;
     print <FF>;
}