Switch to qw<>

[perl/modules/indirect.git] / t / 20-good.t

diff --git a/t/20-good.t b/t/20-good.t
index b3604314816c7afaea73228b56053922d7356e56..97c874c7500c393400df9691eac8153dcc65d8bb 100644 (file)
--- a/t/20-good.t
+++ b/t/20-good.t
@@ -155,7 +155,7 @@ $obj = $pkg    ->   ($cb)   ();
 ####
 $obj = $pkg->$cb( $obj  );
 ####
-$obj = $pkg->$cb(qw/foo bar baz/);
+$obj = $pkg->$cb(qw<foo bar baz>);
 ####
 $obj = $pkg->$meth;
 ####