($substring) = $fullstring =~ /^.{2}(.*?)X/s;