seq_from_spec( \(@site1, @site2) )
        ->seq_concatmap( sub { seq_zip(map seq(split//), @_) } )
        ->seq_foreach(   sub { $counts{"@_"}++ } );