X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fbench.pl;h=fb89ddb40bb4c2352ff46d9c27e2616c10b909de;hb=5d3ec9b6f2a27ddb9a986a67cd428df2340af986;hp=149b964971367e609c3edf78a5b0f413c2bb9aff;hpb=a72dc2a805213bbadf17cbb3c90861cf4f75aeff;p=perl%2Fmodules%2Fwith.git

diff --git a/samples/bench.pl b/samples/bench.pl
index 149b964..fb89ddb 100755
--- a/samples/bench.pl
+++ b/samples/bench.pl
@@ -3,12 +3,12 @@
 use strict;
 use warnings;
 
-use Benchmark qw/cmpthese/;
+use Benchmark qw<cmpthese>;
 
 use lib 'blib/lib';
 
 my $counter;
-my @poultry = (qw/cock chick/);
+my @poultry = (qw<cock chick>);
 
 sub Duck::quack { $counter += $_[0]->{id} * $_[0] }
 sub fly { $counter += $_[0]; }