Help for this page
select(FILE2); $lineout = "$temp1 = $temp2\n"; print $lineout; print STDERR $lineout;