We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 07bde05 commit c6dc267Copy full SHA for c6dc267
t/files/lorem_ipsum.txt.zst
-1.18 KB
t/message-zstd.t
@@ -9,13 +9,13 @@ use Test::More;
9
use Test::Needs 'IO::Compress::Zstd';
10
use Path::Tiny qw( path );
11
12
+require MIME::Base64;
13
require HTTP::Message;
14
15
my $files = path($PROGRAM_NAME)->parent->child('files');
16
my $lorem_ipsum_clear = $files->child('lorem_ipsum.txt')->slurp_utf8;
-my $lorem_ipsum_zstd = $files->child('lorem_ipsum.txt.zst')->slurp_raw;
17
-# my $lorem_ipsum_zstd = $files->child('lorem_ipsum.txt.zst.from_perl')->slurp_raw;
18
my $lorem_ipsum_zstd_b64 = $files->child('lorem_ipsum.txt.zst.b64')->slurp_raw;
+my $lorem_ipsum_zstd = MIME::Base64::decode($lorem_ipsum_zstd_b64);
19
20
subtest "no decoding" => sub {
21
0 commit comments