]> git.vpit.fr Git - perl/modules/Scalar-Vec-Util.git/blobdiff - t/12-veq-long.t
Restyle tests
[perl/modules/Scalar-Vec-Util.git] / t / 12-veq-long.t
index de11abdaa3d65bc93574726ecc6d52906f481b01..aa1faa029a6e3ec899fb0dc7de9e97d8fd1fa861 100644 (file)
@@ -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';