Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

...
$version = "3.5.2+tcl-tk-8.5.18+sqlite-3.10.0";
$path =~ s/.*\Q$version\E\K.*//s;
print($path."\n");
  2. or download this
    /a/b/version1
/some/path/3.5.2+tcl-tk-8.5.18+sqlite-3.10.0