use warnings;
use parent qw/Exporter/;
+use Carp qw/croak/;
+
use IO::Uncompress::Brotli;
our @EXPORT = qw/bro/;
our @EXPORT_OK = @EXPORT;
-our $VERSION = '0.003';
+our $VERSION = '0.004_002';
my %BROTLI_ENCODER_MODE = ( generic => 0, text => 1, font => 2 );
sub mode {
my ($self, $mode) = @_;
- die "Invalid encoder mode"
+ croak 'Invalid encoder mode'
unless $BROTLI_ENCODER_MODE{$mode};
_mode($$self, $mode)
=over
-=item B<bro>(I<$input>)
+=item B<bro>(I<$input>, I<$quality>, I<$window>)
Takes a whole uncompressed buffer as input and returns the compressed
-data.
+data using the supplied quality and window parameters. If quality and
+window parameters are not supplied, default values are used (as
+described under the object-oriented interface).
Exported by default.
=head1 COPYRIGHT AND LICENSE
-Copyright (C) 2015-2017 by Marius Gavrilescu
+Copyright (C) 2015-2018 by Marius Gavrilescu
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.20.2 or,