in reply to Re^2: Number of digits at the end of the stringin thread Number of digits at the end of the string
Well -- to you, talk about ungrateful. It would be better to state more clearly what you want up front.
Adding this additional constraint changes the pattern but a little. Were you to study perlre, you could probably have done it yourself.
sub is_valid { my $test = shift; return $test =~ /^aaa_\w{1,24}(?<!_)_\d{4}$/; } [download]
• another intruder with the mooring in the heart of the Perl