-validatecommand => sub {
       $_[1] =~ /^[aAdDtTsSoOuU]*$/;
  },