my $result;
try {
  $result = SomeClass->new
} catch {
  warn
};