@sum[$a] += $nonesuch; end {emitp  @sum, "a"          }
