Thanks for the answer. But I need some help using substitution.
Please help me. I am new to perl. I tried my level best but no luck.
Even i flag concept did'nt work as it does'nt work for the continuous files when placed below the code.