clean up open3 call in Makefile.PL to avoid warnings and support spaces
Graham Knop [Sat, 28 Dec 2019 19:36:00 +0000 (20:36 +0100)]
Makefile.PL

index e01587b..56b1712 100644 (file)
@@ -52,9 +52,9 @@ if (!$ENV{CATALYST_DEVEL_NO_510_CHECK}) {
     use Symbol 'gensym';
     use IPC::Open3;
     use File::Spec;
-    open NULL, '>', File::Spec->devnull;
+    open my $null, '>', File::Spec->devnull;
     my $err = gensym;
-    my $pid = open3(gensym, '&>NULL', $err, "$^X -It/lib -MUnknownError -e 1");
+    my $pid = open3(gensym, $null, $err, qq{"$^X" -It/lib -MUnknownError -e 1});
 
     my $unknown_error = 0;