$string =~ m/\w{5}/;
#vs
$string =~ m/\w\w\w\w\w/;