summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xget.pl2
1 files changed, 1 insertions, 1 deletions
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);