toniax:

That should work ... what's the problem with it? After all, once it finds "data", what incentive is there for it to keep searching?

Update: If you're looking for the location of the string, you may be interested in perldoc -f index

...roboticus