changed sentence foundry, foundry selector and textClass serialization
diff --git a/script/create_example.pl b/script/create_example.pl
new file mode 100755
index 0000000..275866e
--- /dev/null
+++ b/script/create_example.pl
@@ -0,0 +1,17 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use FindBin;
+use v5.16;
+
+my $dir = $FindBin::Bin;
+
+foreach my $file (qw/00001 00002 00003 00004 00005 00006 02439/) {
+ my $call = 'perl ' . $dir . '/prepare_index.pl -i ' . $dir . '/../examples/WPD/AAA/' . $file . ' -o ' . $dir . '/../' . $file . '.json';
+ print 'Create ' . $file . ".json\n";
+ system($call);
+
+ print 'Create ' . $file . ".json.gz\n";
+ $call .= '.gz -z';
+ system($call);
+};