use IO::Uncompress::Brotli;
for my $test (<brotli/tests/testdata/*.compressed*>) {
my ($expected) = $test =~ s/\.compressed.*//r;
use IO::Uncompress::Brotli;
for my $test (<brotli/tests/testdata/*.compressed*>) {
my ($expected) = $test =~ s/\.compressed.*//r;