czech-wordnet.pl: improve portability

Perl runs `` commands in the shell only if they contain shell metacharacters.
4 months ago · 5ed881d25b
parent 259d0ac860
commit 5ed881d25b
1 changed files with 1 additions and 1 deletions
--- a/dicts/czech-wordnet.pl
+++ b/dicts/czech-wordnet.pl
@ -5,7 +5,7 @@ use warnings;
 use strict;

 # GNU Gzip can unpack a ZIP file, but not the BSD one, and unzip can't use stdin
-my $zipcat = qx/command -v bsdtar/ ? 'bsdtar -xOf-' : 'zcat';
+my $zipcat = qx/(command -v bsdtar)/ ? 'bsdtar -xOf-' : 'zcat';

 my $base = 'https://lindat.cz/repository/xmlui';
 my $path = 'handle/11858/00-097C-0000-0001-4880-3';