sub foo {
  some_code();
  catch {
     print “ignoring $@”;
     say “$_ would be the exact string thrown, without ‘at line…’”;
  }
}

sub bar {
  some_code();
  catch ClassName::Xyz { … }
  catch /pattern/ { … }
  catch ($_ && $_ !~ /io/ && do { … }) { … }
}