$version = "3.5.2+tcl-tk-8.5.18+sqlite-3.10.0";
$path =~ s/\Q$version\E.*/$version/s;