sub getopts ($;$) { my ($argumentative, $hash) = @_; ... # no "return" anywhere... ... $errs == 0; }