Select Code to Download

eval {
    # here we try
...
    # here we catch
    ...
}

# Try clause
my ($error1, $error2);
...
if ($error1) {
    # handle exception
}