in reply to Re^2: Dear Monks, Have created multiple files from one file ...
in thread Dera Monks, Have create multiple file from one file now I want to match a pattern in each file at the same time do the replacement with adding one to the match pattern.

Maybe you should add some debugging prints to see whether $line[0] and $line[1] are actually getting their replacements?

Maybe the input data does not match what you expect?

In Section Seekers of Perl Wisdom