diff --git a/t/030-sub-directories.t b/t/030-sub-directories.t
index db487c6..5b6e01d 100644
--- a/t/030-sub-directories.t
+++ b/t/030-sub-directories.t
@@ -17,7 +17,7 @@ my $content = q:to/PODEND/;
     PODEND
 
 for <sub-dir-1 sub-dir-2 sub-dir-3> -> $d {
-    mkdir DOC ~ "/$d";
+    mkdir IO::Path.new( DOC ~ "/$d" );
     (DOC ~ "/$d/a-file-$_.pod6").IO.spurt($content) for 1..4
 }