if ( $^V gt 'v5.10.0' ) { @diff = grep { ! ({ $_, 0 } ~~ @inst) } @insttab; } else { @hdiff{ @insttab } = undef; delete @hdiff{ @inst }; @diff = keys %hdiff; }