open OUTFILE, "<$outfile";
open FINAL, ">$final";

while (<OUTFILE>) {
    print FINAL if /(line1=\d+)/;
    print FINAL if /(line2=\d+)/;
    print FINAL if /(line3=\d+)/;
    ..........
}