If each field is seperated by a ":" then use the following

my @goodrecs = grep {$_=~/(.*:){3}foo@foobar.com/} @recs
[download]