my $res = eval {
 something(...);
};
if ($@) {
  die $@;
} else {
 do_something_more(...)
}
return $res;

##</code><code>##

my $res = do {
  something(...);
};
do_something_more(...)
return $res;

##</code><code>##

my $res = something(...);
do_something_more(...)
return $res;