Hi Velusamy,
Thanks a lot. But There is some problem in the output...
I made a small change in your code
<code> ($pre eq "") ? ($col = 0):($col = split/\s+/, $pre); <code> Now its giving proper output.
The word repeated in Line 1 and in column 4
The word repeated in Line 3 and in column 2
The word repeated in Line 3 and in column 4
The word repeated in Line 4 and in column 1
The word repeated in Line 4 and in column 5
The word repeated in Line 4 and in column 7
Thanks