diff options
| author | Přemysl Eric Janouch <p@janouch.name> | 2022-08-01 23:20:47 +0200 |
|---|---|---|
| committer | Přemysl Eric Janouch <p@janouch.name> | 2022-08-01 23:25:15 +0200 |
| commit | 5ed881d25bb9a73df57624d73cafb1af1638688e (patch) | |
| tree | 3e8062fb321ccc29df307815689ac85f7169b9b9 | |
| parent | 259d0ac860bfa7f01131d42ab4c1093b092ef9ee (diff) | |
| download | tdv-5ed881d25bb9a73df57624d73cafb1af1638688e.tar.gz tdv-5ed881d25bb9a73df57624d73cafb1af1638688e.tar.xz tdv-5ed881d25bb9a73df57624d73cafb1af1638688e.zip | |
czech-wordnet.pl: improve portability
Perl runs `` commands in the shell only if they contain
shell metacharacters.
| -rwxr-xr-x | dicts/czech-wordnet.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dicts/czech-wordnet.pl b/dicts/czech-wordnet.pl index d1d32f9..23660e0 100755 --- 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'; |