Thanks, John. It works smoothly. Amazingly simple. Actually, I use similar match, but different print. I know what I did wrong before: I use this instead- print $_, ".\n"; (after the match) And it only works for the first instance! Will join this group now.