1 2 3 4 5
my $release = '8.2.3X3'; if ($release =~ /^(\d+\.\d+\.\d+)(X|x)\d+$/) { print "mthed"; }
1
mthed