p
/
tdv
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

czech-wordnet.pl: improve portability 

Perl runs `` commands in the shell only if they contain
shell metacharacters.
This commit is contained in:
Přemysl Eric Janouch 2022-08-01 23:20:47 +02:00
parent 259d0ac860
commit 5ed881d25b
Signed by: p
GPG Key ID: A0420B94F92B9493
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dicts/czech-wordnet.pl
View File

@ -5,7 +5,7 @@ use warnings;
use strict; use strict;
# GNU Gzip can unpack a ZIP file, but not the BSD one, and unzip can't use stdin # 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 $base = 'https://lindat.cz/repository/xmlui';
my $path = 'handle/11858/00-097C-0000-0001-4880-3'; my $path = 'handle/11858/00-097C-0000-0001-4880-3';