... © 2004 O’Reilly & Associates, Inc. All rights reserved.550 Chapter 18 CHAPTER 18 mod_perl Data-Sharing TechniquesIn this chapter, we discuss the ways mod_perl makes it possible to share ... well.Example 18- 1. Book/Cache.pmpackage Book::Cache;%Book::Cache::DATA = get_data( );sub get_data { # some heavy code that generates/retrieves data}1;,ch18.25021 Page 551 Thursday, November 18, ... look like this: use enum qw(FIRST SECOND THIRD);use vars qw($RA_CACHE);,ch18.25021 Page 550 Thursday, November 18, 2004 12:44 PMThis is the Title of the Book, eMatter EditionCopyright ©...