]> git.vpit.fr Git - perl/modules/Sub-Nary.git/blobdiff - t/23-branch.t
Switch qw delimiters to <>
[perl/modules/Sub-Nary.git] / t / 23-branch.t
index ae0456481a2b47101b47793e18ca1b55c9909c64..fef709dc1da61c42bddf566e42d0ca974b4c924e 100644 (file)
@@ -40,7 +40,7 @@ sub ret1234 {
  } elsif ($h{foo}) {
   return 3, @a[4, 5];
  } elsif (@a) {
-  return @h{qw/a b c/}, $y
+  return @h{qw<a b c>}, $y
  }
 }