exit "Sorry, name can't be empty"
  if $name eq ''
;

##</code><code>##

perl -e 'exit "foo"'; echo $?