sub process_files {
    my ($InputFile1, $InputFile2, $OutputFile3) = @_;
    # ... rest of your code here
}