in reply to Grep Effeciency

@NETID{@totalnetname{@totalkeys}} = (); @ECLDATA = grep{ /^(\w+)\|$datecompare/ && exists $NETID{$1} } @ECL_ST +AT;