Re^4: Looking for a regular expression for the following pattern.

in reply to Re^3: Looking for a regular expression for the following pattern.
in thread Looking for a regular expression for the following pattern.

So 'a_________' '%%a_____%%' '123456789_' would be strings skooma would want to match? That wasn't my (limited) understanding after reading the OP.

c:\@Work\Perl\monks>perl -wMstrict -le
"for my $s (qw(a_________  %%a_____%%  123456789_)) {
   print qq{'$s' matches} if $s =~ /[[:alnum:]]+[_]+/;
   }
"
'a_________' matches
'%%a_____%%' matches
'123456789_' matches
[download]

Update 1: And what about the { } curlies?

Update 2: And please use code tags when you post. Please see Writeup Formatting Tips and Markup in the Monastery.

Give a man a fish: <%-{-{-{-<

Comment on Re^4: Looking for a regular expression for the following pattern. Select or Download Code

In Section Seekers of Perl Wisdom