$mystring =~ s{(\d{3,5})} {