Here's how I modified it:
Outputs:my $R = 'dounut_s12x30'; print "$1, $2\n" if $R !~ /^i|^ddi/ and $R =~ /^[a-z_]+(\d+\.?\d*)[a-z_]?(\d+\.?\d*)? +/;
Is this what you are asking?
Russ
In reply to RE: Regex trouble
by Russ
in thread Regex trouble
by cyclone
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |