X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F12-veq-long.t;h=aa1faa029a6e3ec899fb0dc7de9e97d8fd1fa861;hb=2bade59206c8f2bd2ed64e1faa8b10cc9109b734;hp=de11abdaa3d65bc93574726ecc6d52906f481b01;hpb=f77706f0734eb34a9623cc492b5d73061fba9b62;p=perl%2Fmodules%2FScalar-Vec-Util.git

diff --git a/t/12-veq-long.t b/t/12-veq-long.t
index de11abd..aa1faa0 100644
--- a/t/12-veq-long.t
+++ b/t/12-veq-long.t
@@ -4,9 +4,9 @@ use strict;
 use warnings;
 
 use Test::More tests => 1;
-use Config qw/%Config/;
+use Config qw<%Config>;
 
-use Scalar::Vec::Util qw/veq/;
+use Scalar::Vec::Util qw<veq>;
 
 my ($v1, $v2) = ('') x 2;
 my $n = ($Config{alignbytes} - 1) * 8;
@@ -18,4 +18,4 @@ while ($i >= 1) {
  vec($v2, $i + 1, 1) = 1;
  $i /= 2;
 }
-ok(veq($v1, 0, $v2, 1, 10 * $n), 'long veq is loooong');
+ok veq($v1, 0, $v2, 1, 10 * $n), 'long veq is loooong';