Select Code to Download

 472: sub getNodeById
 473: {
...
 488:     # See if we have this node cached already
 489:     $cachedNode = $this->{cache}->getCachedNodeById($N);
 490:     return $cachedNode unless ($selectop eq 'force' or not $cach
+edNode);

095:         $db->{cache} = new Everything::NodeCache($this, 300);

 968: sub evalCode {    
 969:     my( $code )= shift @_;
...
 985:     my $str = eval $code;       

 ...

my $sub = $evalcode_cache{$str} //= eval " sub { $str }"; 
my $str = $sub->(@_);