if (grep { exists $line{$_} } @{$new{a}}) {