open (FILE1, "<tabtext.txt");
open (FILE2, ">ludo.txt");
while(<FILE1>){
    foreach my $paramKey (@params){
        if (/$paramKey/){
            print FILE2;
        }
    }
}
close(FILE1);
close(FILE2);