my ( $x, $y, $z ) = mysub( @args );
if ( $x or defined( $y )) {
    .... do stuff
}
else {
    .... handle error
}