Help for this page
#!/Perl/bin/perl -w ... close INFILE; close OUT; exit;
results.txt matched line 1 ... matched line 3 results of second match and so on...