use Regexp::Common;
    /^\s*$RE{num}{real}\s*[a-z]{1,2}\s*$/;