Preserved Topic: Catching an Uncaught Exception (in perl) (Page 1 of 1)

Hey all,

Short story, I'm writing a script that creates a directory on the server. I'm trying to use the mkpath function (part of the File::Path module) and I'm having a problem. When it can not create directory (the parent is unwriteable). The module causes an Uncaught Exception and kills the script. This doesn't work for me since I want to be able to go to a second option if it can't create the directory.

Before I write a looping script using mkdir, does anyone know how to catch this exception before it kills the script?



:[ Computers let you make more mistakes faster than any other invention in human history, with the possible exceptions of handguns and tequila. ]:

Exception hanlding in PERL is done by using eval { } statement and then checking for error(s) in $@, like this:

eval {
    # your code here
};
if ($@) {
    # handle exception
}

I think Perl also has file test operators. There's probably something for writeable.