eval {
  last;
};
warn $@ || 'no error';

for (1) {
  eval {
    last;
  };
}
warn $@ || 'no error';