my  @string = qw(a a b h a g s j s z u u e);