Page

Stores data read from wiki internal db file format for current page, plus some other information about the page

This bit of code illustrates the data-reading-in bit:

     $data = &ReadFileOrDie($fname);
     %Page = split(/$FS1/, $data, -1);  # -1 keeps trailing null fields

This bit of code illustrates the initialization bit:

       sub OpenNewPage {
         my ($id) = @_;

         %Page = ();
         $Page{'version'} = 3;      # Data format version
         $Page{'revision'} = 0;     # Number of edited times
         $Page{'tscreate'} = $Now;  # Set once at creation
         $Page{'ts'} = $Now;        # Updated every edit
       }