sub foo {
  # bunch of code
  if ( $some_condition ) {
    # do a bunch of stuff
    return $something;
  }
  else {
    # do some other stuff
    croak($error);
  }
  # do some more stuff
}