my $regex = '(?:' . join('|', @id) . ')';

  while ( $data = <DB> ) {
    print OUT $data if $data =~ /$regex/o;
  }