my $release = '9.2X17';

if ($release =~ /^(\d+\.\d+\.\d+)(X|x)\d+$/) {
print "mthed";
}