summaryrefslogtreecommitdiffstats
path: root/chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm
diff options
context:
space:
mode:
Diffstat (limited to 'chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm')
-rw-r--r--chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm53
1 files changed, 0 insertions, 53 deletions
diff --git a/chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm b/chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm
deleted file mode 100644
index 077c5703b0a..00000000000
--- a/chromium/third_party/cygwin/lib/perl5/5.10/DBM_Filter/compress.pm
+++ /dev/null
@@ -1,53 +0,0 @@
-package DBM_Filter::compress ;
-
-use strict;
-use warnings;
-use Carp;
-
-our $VERSION = '0.01';
-
-BEGIN
-{
- eval { require Compress::Zlib; Compress::Zlib->import() };
-
- croak "Compress::Zlib module not found.\n"
- if $@;
-}
-
-
-
-sub Store { $_ = compress($_) }
-sub Fetch { $_ = uncompress($_) }
-
-1;
-
-__END__
-
-=head1 NAME
-
-DBM_Filter::compress - filter for DBM_Filter
-
-=head1 SYNOPSIS
-
- use SDBM_File; # or DB_File, or GDBM_File, or NDBM_File, or ODBM_File
- use DBM_Filter ;
-
- $db = tie %hash, ...
- $db->Filter_Push('compress');
-
-=head1 DESCRIPTION
-
-This DBM filter will compress all data before it is written to the database
-and uncompressed it on reading.
-
-A fatal error will be thrown if the Compress::Zlib module is not
-available.
-
-=head1 SEE ALSO
-
-L<DBM_Filter>, L<perldbmfilter>, L<Compress::Zlib>
-
-=head1 AUTHOR
-
-Paul Marquess pmqs@cpan.org
-