improve examples

Author: gfldex

doc/Type/IO/Path.pod6

@@ -528,8 +528,8 @@ Usage:
 
 If you have a string - a path to something in the filesystem:
 
-    if "path/to/file".IO ~~ :e {
-        say 'file exists';
+    if "path/to/directory".IO ~~ :e & :d {
+        say 'path exists and is a directory';
     }
 
     my $file = "path/to/file";
@@ -547,9 +547,10 @@ If you already have an IO object in $file, either by creating one yourself,
 or by getting it from another subroutine, such as C<dir>,
 you can write this:
 
-    my $file = "path/to/file".IO;
-    if $file ~~ :e {
-        say 'file exists';
+    my $path = "path/to/file".IO;
+    given $path {
+        when :f { say 'path is a file' }
+        when :d { say 'path is a directory' }
     }
 
 =head1 File timestamp retrieval