Help for this page

Select Code to Download

Select or download this

#! /usr/bin/perl -w

...
    $index->optimize;

print Dumper \%documents;

Select or download this

$VAR1 = {
    "file1.txt" => "The content...",
    #etcetera
 };