for (1..5) {
  last unless machwas();
  ...
}

sub machwas {1}