fn count(x) ≔
  (+)|0 [:1"x;

count ((~/(0|2|4|6|8)$/) #. $0)