avoid { "Got extra Z: @_\n" if @_ >1 } my @v = keys %h;