NAME
File::Compressible - determine if a mime type is compressible
SYNOPSIS
use File::Compressible 'compressible;
use File::Type;
...
my $ft = File::Type->new();
for my $file (@files) {
my $type = checktype_filename($file);
next unless $type;
next unless compressible($type);
# do some compression magic!
}
DESCRIPTION
File::Compressible supplies one exportable function, "compressible",
which takes a mime type and returns true if it is compressible, undef if
not.
Compressible mime types are stored in a package variable,
@File::Compressible::compressible. It is concidered okay to modify this
list and future versioins will maintain this. A second package variable
contains precompiled regular expressions that are tested against passed
mime types, it is named @File::Compressible::compressible_re.
AUTHOR
Mike Greb <michael@thegrebs.com>
COPYRIGHT
Copyright 2013- Mike Greb
LICENSE
This library is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
SEE ALSO
File::Type