Merge pull request #520 from clarkema/fix-non-utf-source-macos

Fix issue with macOS /bin/sh and weird source names
Raku · Mar 12, 2019 · 40bd883 · 40bd883
2 parents fbf26db + 694c5ae
commit 40bd883
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/S32-str/utf8-c8.t b/S32-str/utf8-c8.t
@@ -90,8 +90,10 @@ else {
         is $proc.out.get, 'lived', 'Can run Perl 6 with non-UTF-8 environment';
     }
     {
-        my $cmd = Q{echo 'say(42)' > $'L\xe9on' && } ~ $*EXECUTABLE ~ Q{ $'L\xe9on' && rm $'L\xe9on'};
-        my $proc = shell $cmd, :out;
+        my $filename = "L\xe9on";
+        spurt $filename, 'say(42)';
+        LEAVE { try unlink $filename }
+        my $proc = run $*EXECUTABLE, $filename, :out;
         is $proc.out.get, '42', 'Can run Perl 6 sourcefile with non-UTF-8 name';
     }
 }