my $lines = merge_lines(\@file1, \@file2);
write_file('file3', @$lines);