s4

changeset 716:07863b13e3f9

find changesets by author, revision, files, or words in the commit message
TEST: Extract basename of filename= argument of CGI params.
author HIROSE Yuuji <yuuji@gentei.org>
date Sat, 30 May 2020 23:26:25 +0900
parents d890694ff8ab
children 0f7dde18024b
files mpsplit.pl
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line diff
     1.1 --- a/mpsplit.pl	Sat May 30 14:09:21 2020 +0900
     1.2 +++ b/mpsplit.pl	Sat May 30 23:26:25 2020 +0900
     1.3 @@ -31,6 +31,7 @@
     1.4        $fn = $1;
     1.5      }
     1.6      $fn =~ s/ /_/g;
     1.7 +    $fn =~ s,.*[/\\],,;
     1.8      open(OUT, ">$dir/$fn");
     1.9        print OUT $body;
    1.10      close(OUT);