my $test = "blah <span class='small'>13a</span> blah blah";
if ( $test =~ /(.)(\d+[a-z]*)(.)/ && $1 ne '>' && $2 ne '<') {
    print "No tag found: $2\n";
} else {
    print "No match"
}