my @contacts = map { $_->contact_id } InContact::cDBI::contactdetail->search(recontact =
> $tm);