diff --git a/perl/t/01_pack.t b/perl/t/01_pack.t
index 0917f045..60c67f89 100644
--- a/perl/t/01_pack.t
+++ b/perl/t/01_pack.t
@@ -52,7 +52,6 @@ my @dat = (
     2147483648, 'ce 80 00 00 00',
     -2147483648, 'd2 80 00 00 00',
 );
-@dat = (2147483648, 'ce 80 00 00 00');
 plan tests => 1*(scalar(@dat)/2);
 
 for (my $i=0; $i<scalar(@dat); ) {