That's actually pretty sane, except for the false positives you get from various substrings: @array = qw{foo bar baz}; $sought = qq(o$"b);. If you know your data well enough to eliminate that, this ought to be pretty efficient.

After Compline,
Zaxo