my (@array, $value) = @_;