#!/usr/bin/perl

use strict;
use lib "/home/monkads/0.8mods";

use vars qw( @updatedModules );
BEGIN {
  # When this mod_perl process starts, see if we inheritted old versions
  # of key modules from our parent which hasn't been restarted recently:
  my %ver= (
    "Everything::HTML" => 1.011,
  );
  for my $mod (  keys %ver  ) {
    no strict;
    if(  ${$mod."::VERSION"} < $ver{$mod}  ) {
      push @updatedModules, $mod;
      $mod =~ s.::./.g;
      delete $INC{"$mod.pm"};
      require "$mod.pm";  # Not really required here.
    }
  }
}

use Everything::HTML;

mod_perlInit "perlmonk_ebase";


if(  @updatedModules  ) {
  print "\n<!-- updated modules this load($$): @updatedModules -->\n";
  @updatedModules= ();
}

##</code><code>##

s/inheritted/inherited/