say sum 0, map count_zeros($cgs,$_), <DATA>;