my $one_char_at_random = $chars[rand @chars];