for(  @ECL_STAT  ) {
    my( $NETID )= split /\|/, $_;
    push @{$byID{$NETID}}, $_;
}