Select Code to Download

##sub THEFAKEOUT contains the actual nodelet
## the rest of the stuff is just for testing puroses
...

__END__
#

use Benchmark qw( cmpthese timethese );
use Storable qw( freeze thaw );
...
Data::Denter 170/s           --         -52%
Storable     356/s         110%           --

# $DB = tie ... DB_File .. BTREE

...

# now you know

bash-2.05$ cat MyConfig.pm

# This is CPAN.pm's systemwide configuration file. This file provides
...
};
1;
__END__

#!/usr/bin/perl -w
use CGI::Carp qw( fatalsToBrowser );
...
    print pre(escapeHTML(Dumper \%CPAN::Config));
    # to make sure it's what you want
}

<H1>D'url JavaScript</H1>
<script language="javascript">
...
<B><a NAME="dlinxor" href="javascript:OutsideLinks()">
Outside Links</a></B><BR>
</DIV>