Reflect the recent renaming of tabfile in scripts
This commit is contained in:
parent
d3cfb12e16
commit
f94bb77091
|
@ -55,7 +55,7 @@ while (my ($id, $synset) = each %synsets) {
|
|||
|
||||
# Output synsets exploded to individual words, with expanded relationships
|
||||
close($doc) or die $?;
|
||||
open(my $tabfile, '|-', 'tabfile', 'czech-wordnet',
|
||||
open(my $tabfile, '|-', 'tdv-tabfile', 'czech-wordnet',
|
||||
'--book-name=Czech WordNet 1.9 PDT', "--website=$base/$path",
|
||||
'--date=2011-01-24', '--collation=cs_CZ') or die $!;
|
||||
|
||||
|
|
|
@ -9,7 +9,7 @@ grep -v ^# | sed 's/\\//g' | perl -CSD -F\\t -le '
|
|||
sub tabesc { shift =~ s/\\/\\\\/gr =~ s/\n/\\n/gr =~ s/\t/\\t/gr }
|
||||
sub w {
|
||||
my ($name, $dict, $collation) = @_;
|
||||
open(my $f, "|-", "tabfile", "--pango", "--collation=$collation",
|
||||
open(my $f, "|-", "tdv-tabfile", "--pango", "--collation=$collation",
|
||||
"--website=https://gnu.nemeckoceskyslovnik.cz",
|
||||
"gnu-fdl-$name") or die $!;
|
||||
print $f tabesc($keyword) . "\t" . tabesc(join("\n", @$defs))
|
||||
|
|
|
@ -5,7 +5,7 @@ zcat | grep -v ^# | sed 's/\\//g' | perl -CSD -F\\t -le '
|
|||
sub tabesc { shift =~ s/\\/\\\\/gr =~ s/\n/\\n/gr =~ s/\t/\\t/gr }
|
||||
sub w {
|
||||
my ($name, $dict, $collation) = @_;
|
||||
open(my $f, "|-", "tabfile", "--pango", "--collation=$collation",
|
||||
open(my $f, "|-", "tdv-tabfile", "--pango", "--collation=$collation",
|
||||
"--website=https://www.svobodneslovniky.cz",
|
||||
"gnu-fdl-$name") or die $!;
|
||||
print $f tabesc($keyword) . "\t" . tabesc(join("\n", @$defs))
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
curl -Lo- https://slovnik-cizich-slov.abz.cz/export.php | \
|
||||
iconv -f latin2 -t UTF-8 | perl -CSD -F\\\| -le '
|
||||
print "$_\t" . $F[2] =~ s/\\/\\\\/gr =~ s/; /\\n/gr for split(", ", $F[0])
|
||||
' | sort -u | tabfile slovnik-cizich-slov \
|
||||
' | sort -u | tdv-tabfile slovnik-cizich-slov \
|
||||
--book-name="Slovník cizích slov" \
|
||||
--website=https://slovnik-cizich-slov.abz.cz \
|
||||
--date="$(date +%F)" \
|
||||
|
|
Loading…
Reference in New Issue