/usr/share/perl5/MLDBM/Serializer/FreezeThaw.pm is in libmldbm-perl 2.05-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | ####################################################################
package MLDBM::Serializer::FreezeThaw;
BEGIN { @MLDBM::Serializer::FreezeThaw::ISA = qw(MLDBM::Serializer) }
use FreezeThaw;
sub serialize {
return FreezeThaw::freeze($_[1]);
}
sub deserialize {
my ($obj) = FreezeThaw::thaw($_[1]);
return $obj;
}
1;
|