if (grep /$_/,  @{$tbl{$i}}  ) {