As much as I like the #Perl built-in try/catch syntax, I do not like the following:

my $result;
try {
$result = ...
}

Putting it in a do expression just seems messy

my $result = do {
try {
...
}
}