From 1d0d0c1bd2a9c43397d5c8ac20887d4e357d0ca7 Mon Sep 17 00:00:00 2001 From: Jules Laplace Date: Fri, 22 Jun 2018 17:40:14 +0200 Subject: eriod --- get.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/get.pl b/get.pl index 5f4cf78..56510d0 100755 --- a/get.pl +++ b/get.pl @@ -68,7 +68,7 @@ if ($video_fn) { print "Video filename: $video_fn\n"; my $tag = sanitize($video_fn); print "creating dataset: $tag\n"; - my @partz = split(".", $video_fn); + my @partz = split(/\./, $video_fn); my $ext = $partz[$#partz]; my $new_fn = $tag . '.' . $ext; system('mv', $video_fn, $new_fn); -- cgit v1.2.3-70-g09d2