Please post your test code and output in something like the format shown below, and please use code tags; I can't really understand your regex without guessing! Please also give your expected/desired output; "it does not work" does not tell me very much. 

c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -e
"my @test = qw(RC1XY RS RW12QW1X FOO FOOx FOO23PQ xFOO23PQXXX foo xyzz
+y);
 ;;
 for my $s (@test) {
   printf qq{'$s' -> };
   if (my ($p_r, $d1, $p_mc, $p_new_mc) = $s =~ m{
     ([[:upper:]]+) (\d*) ([[:upper:]]?) ([[:upper:]]?)
     }xms) {
     dd $p_r, $d1, $p_mc, $p_new_mc;
     }
   else {
     print qq{no match \n};
     }
   }
"
'RC1XY' -> ("RC", 1, "X", "Y")
'RS' -> ("RS", "", "", "")
'RW12QW1X' -> ("RW", 12, "Q", "W")
'FOO' -> ("FOO", "", "", "")
'FOOx' -> ("FOO", "", "", "")
'FOO23PQ' -> ("FOO", 23, "P", "Q")
'xFOO23PQXXX' -> ("FOO", 23, "P", "Q")
'foo' -> no match
'xyzzy' -> no match

[download]

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

In reply to Re^5: Question on Regular Expression by AnomalousMonk
in thread Question on Regular Expression by sjain

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.