diff --git a/perl/t/06_stream_unpack2.t b/perl/t/06_stream_unpack2.t
index dc82c411..eaf2cb4b 100644
--- a/perl/t/06_stream_unpack2.t
+++ b/perl/t/06_stream_unpack2.t
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 use Data::MessagePack;
-use Test::More;
+use Test::More tests => 6;
 
 my $input = [(undef)x16];
 my $packed = Data::MessagePack->pack($input);
@@ -22,5 +22,4 @@ is_deeply(Data::MessagePack->unpack($packed), $input);
     is_deeply $up->data, $input;
 }
 
-done_testing;