If he only needs substring matching, then index is faster and safer than regular expressions. He wouldn't have to worry about escaping characters or compiling the regex.

if (index($record->[1], $data->[0]) >= 0) {
[download]