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);
+};
diff --git a/script/prepare_index.pl b/script/prepare_index.pl
index 2b98cfa..21d8dd9 100644
--- a/script/prepare_index.pl
+++ b/script/prepare_index.pl
@@ -124,7 +124,7 @@
 my @layers;
 
 # Base information
-push(@layers, ['OpenNLP', 'Sentences']);
+push(@layers, ['Base', 'Sentences']);
 push(@layers, ['Base', 'Paragraphs']);
 
 # OpenNLP