What do you intend:
my $string = join '', map $chars rand @chars , 1 .. 100; [download]
to do?
In reply to Re: Finding a pattern in a string by GrandFather in thread Finding a pattern in a string by Kenin