No. This is not a code writing service. If it is so urgent for you, consider hiring somebody. We will assist you in learning Perl, and we have already shown you the parts that are needed for a program that will do what you seem to want. But combining these parts and finding the errors is the thing you need to do yourself.