I have two text files:


File1.txt is:

a, b, c, d, e, f1234567890qwertyuiopasdfghjkldfdf
a, b, c, c, e, fopasdfghjklfdhdkjdffgfksofbfkdndkfbfbfkf
a, b, c, d, e, fdsffdsqwertyuiopasdfghjklfdcfdfd
a, b, c, d, e, fqwertyuiopasdfghjkl90reyuebvcd

File2.txt is:

d,90
k,70
p,450

I would like a perl script to read file2.txt (column[0] and column[1]) and find where it matches in File1.txt(where matches are in column[3] and column[5]), for each line that occurs. The filenames/filepaths need to be hardcoded, as I don't want user to input the files.

For example, the expected result would be-

I would like the output to be written to another file like this:

Output.txt is:

a, b, c, d, e, f1234567890qwertyuiopasdfghjkldfdf
a, b, c, d, e, fqwertyuiopasdfghjkl90reyuebvcd

Thanks in advance