unless ( DO_SOMETHING ) {
  warn("some warning");
  next;
}