$ perl6 -v
This is Rakudo version 2017.07 built on MoarVM version 2017.07
implementing Perl 6.c.
$ perl6
To exit type 'exit' or '^D'
> '/'.IO.d
True
> try { mkdir '/' }
"/".IO
> if $! { say "Fail" } else { say "Bazinga" }
Bazinga

So the  mkdir / would have failed because the dir exists. But it is a .d so
maybe that's ok.

Lets try mkdir on an existing file that we also have permissions to modify.

> 'afile'.IO.d
False
> 'afile'.IO.e
True
> try { mkdir 'afile' }
"afile".IO
> if $! { say "Fail" } else { say "Bazinga" }
Bazinga
> 'afile'.IO.d
False
>

Surely that mkdir should fail?

mkdir does fail properly sometimes:

> try { mkdir '/root/noway' }
Nil
> if $! { say "Fail" } else { say "Bazinga" }
Fail

In perl5:

  DB<3> mkdir "afile" or warn "$!\n"
File exists
 DB<4> mkdir "/" or warn "$!\n"
File exists
 DB<5> mkdir "/root/noway" or warn "$!\n"
Permission denied
  DB<6> mkdir "adir" or warn "$!\n"

  DB<7> mkdir "adir" or warn "$!\n"
File exists

-- 
Norman Gaywood, Computer Systems Officer
School of Science and Technology
University of New England
Armidale NSW 2351, Australia

ngayw...@une.edu.au  http://turing.une.edu.au/~ngaywood
Phone: +61 (0)2 6773 2412  Mobile: +61 (0)4 7862 0062

Please avoid sending me Word or Power Point attachments.
See http://www.gnu.org/philosophy/no-word-attachments.html

Reply via email to