home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2004 December / PCpro_2004_12.ISO / files / webserver / xampp / xampp-perl-addon-1.4.9-installer.exe / FreezeThaw.pm < prev    next >
Encoding:
Perl POD Document  |  2001-07-13  |  351 b   |  17 lines
  1. ####################################################################
  2. package MLDBM::Serializer::FreezeThaw;
  3. BEGIN { @MLDBM::Serializer::FreezeThaw::ISA = qw(MLDBM::Serializer) }
  4.  
  5. use FreezeThaw;
  6.  
  7. sub serialize {
  8.     return FreezeThaw::freeze($_[1]);
  9. }
  10.  
  11. sub deserialize {
  12.     my ($obj) = FreezeThaw::thaw($_[1]);
  13.     return $obj;
  14. }
  15.  
  16. 1;
  17.