diff options
author | trizen <trizen@protonmail.com> | 2020-09-27 09:56:51 +0300 |
---|---|---|
committer | Jesús <heckyel@hyperbola.info> | 2020-09-28 22:24:12 -0500 |
commit | 256be95193598233bd2abd18d80499c476f61fbf (patch) | |
tree | 9635e6d38a11e870c2d1de3ed878ce9e7b8e2350 /lib/WWW/FairViewer/Search.pm | |
parent | 27774c9579fad5b7595c3f936597307feadaef9d (diff) | |
download | fair-viewer-256be95193598233bd2abd18d80499c476f61fbf.tar.lz fair-viewer-256be95193598233bd2abd18d80499c476f61fbf.tar.xz fair-viewer-256be95193598233bd2abd18d80499c476f61fbf.zip |
quotemeta() the filename of the cookie file when passing it to `hypervideo`.
This now allows the filename to contain shell metacharacters.
Signed-off-by: Jesús <heckyel@hyperbola.info>
Diffstat (limited to 'lib/WWW/FairViewer/Search.pm')
-rw-r--r-- | lib/WWW/FairViewer/Search.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/WWW/FairViewer/Search.pm b/lib/WWW/FairViewer/Search.pm index af6005b..6f4e8d0 100644 --- a/lib/WWW/FairViewer/Search.pm +++ b/lib/WWW/FairViewer/Search.pm @@ -167,16 +167,16 @@ sub related_to_videoID { my $viewCount = 0; - if ($info->{viewCountText}{simpleText} =~ /^([\d,]+) views/) { + if (($info->{viewCountText}{simpleText} // '') =~ /^([\d,]+) views/) { $viewCount = ($1 =~ tr/,//dr); } - elsif ($info->{viewCountText}{simpleText} =~ /Recommended for you/i) { + elsif (($info->{viewCountText}{simpleText} // '') =~ /Recommended for you/i) { next; # filter out recommended videos from related videos } my $lengthSeconds = 0; - if ($info->{lengthText}{simpleText} =~ /([\d:]+)/) { + if (($info->{lengthText}{simpleText} // '') =~ /([\d:]+)/) { my $time = $1; my @fields = split(/:/, $time); |