C:\test>perl -MFile::Copy -e "use diagnostics; copy('x', 'y') or die qq~$!~"
Uncaught exception from user code:
        No such file or directory at -e line 1.