sub param {
    ...
    return wantarray ?  @result : $result[0];
}