41.1. PL/무지개 토토 함수 및 인수

PL/무지개 토토 언어로 함수를 생성하려면 표준을 사용하십시오.PostgreSQL : 문서 : 9.0 : 배트맨 토토 만들기구문:

함수 생성기능 이름 (인수 유형) 반환반환 유형AS $$
    # PL/무지개 토토 함수 본문
$$ 언어 pl무지개 토토;

함수 본문은 일반 무지개 토토 코드입니다. 실제로, PL/무지개 토토 글루 코드는 이를 무지개 토토 서브루틴 내부에 래핑합니다. PL/펄 함수가 스칼라 컨텍스트에서 호출되었으므로 결과를 반환할 수 없습니다. 목록. 스칼라가 아닌 값(배열, 레코드 및 아래 설명된 대로 참조를 반환하여 설정합니다.

PL/Perl은 또한 다음으로 호출되는 익명 코드 블록을 지원합니다.메이저 토토 사이트 : 문서 : 9.0 : do성명:

DO $$
    # PL/펄 코드
$$ 언어 plperl;

익명의 코드 블록은 인수를 받지 않습니다. 반환될 수 있는 값은 삭제됩니다. 그렇지 않으면 그냥 동작합니다 함수처럼요.

의 구문은함수 생성명령을 사용하려면 함수 본문을 문자열로 작성해야 합니다. 일정하다. 일반적으로 달러 인용을 사용하는 것이 가장 편리합니다. (참조섹션 4.1.2.4)을 문자열 상수로 사용합니다. 탈출을 사용하기로 선택한 경우 문자열 구문E'', 두 배로 늘려야 합니다. 작은따옴표(') 및 백슬래시 (\) 함수 본문에 사용됨 (참조섹션 4.1.2.1).

인수와 결과는 다른 무지개 토토에서처럼 처리됩니다 서브루틴: 인수가 전달됩니다.@_, 결과 값은반환또는 기능.

예를 들어, 두 정수 중 더 큰 값을 반환하는 함수 값은 다음과 같이 정의될 수 있습니다.

CREATE FUNCTION 무지개 토토_max (정수, 정수) $$로 정수를 반환합니다.
    if ($_[0]  $_[1])  return $_[0]; 
    $_[1] 반환;
$$ 언어 plperl;

SQL null 값이 함수에 전달되면 인수는 값은 다음과 같이 표시됩니다."정의되지 않음"에 펄. 위의 함수 정의는 그다지 훌륭하게 동작하지 않습니다. null 입력이 있는 경우(실제로는 null 입력인 것처럼 작동합니다.) 0). 추가할 수도 있습니다STRICT에 만들 함수 정의PostgreSQL좀 더 합리적인 조치를 취하세요: 만약 null 값이 전달되면 함수가 전혀 호출되지 않습니다. 하지만 자동으로 null 결과를 반환합니다. 대안적으로, 함수 본문에서 정의되지 않은 입력을 확인할 수 있습니다. 에 대한 예를 들어, 우리가 원했다고 가정해 보겠습니다.무지개 토토_max하나의 null 인수와 하나의 null이 아닌 인수 포함 null 값이 아닌 null이 아닌 인수를 반환하려면 다음을 수행하세요.

CREATE FUNCTION 무지개 토토_max (정수, 정수) $$로 정수를 반환합니다.
    내 ($x, $y) = @_;
    if (정의되지 않음 $x) 
        $y가 정의되지 않은 경우 undef를 반환합니다.
        $y를 반환합니다;

    $y가 정의되지 않은 경우 $x를 반환합니다.
    $x  $y이면 $x를 반환합니다.
    $y를 반환합니다;
$$ 언어 plperl;

위에 표시된 대로 PL/Perl에서 SQL null 값을 반환하려면 함수는 정의되지 않은 값을 반환합니다. 이는 다음 여부에 관계없이 수행될 수 있습니다. 기능이 엄격한지 아닌지.

함수 인수에서 참조가 아닌 모든 것은 표준에 있는 문자열포스트그레SQL외부 텍스트 표현 관련 데이터 유형. 일반 숫자나 문자의 경우 유형에 따라 무지개 토토은 옳은 일을 할 것이고 프로그래머는 그렇게 할 것입니다. 일반적으로 걱정할 필요가 없습니다. 그러나 다른 경우에는 주장은 좀 더 나은 형태로 변환되어야 할 것이다. 무지개 토토에서 사용할 수 있습니다. 예를 들어,decode_bytea함수를 사용하여 유형의 인수바이테아이스케이프되지 않은 상태로 바이너리.

마찬가지로 다음으로 전달된 값은PostgreSQL외부 텍스트에 있어야 합니다. 표현형식. 예를 들어,encode_bytea함수를 사용하여 탈출할 수 있습니다. 유형의 반환 값에 대한 이진 데이터바이테아.

Perl이 반환될 수 있음포스트그레SQL배열은 Perl 배열에 대한 참조로 사용됩니다. 예는 다음과 같습니다.

CREATE OR REPLACE 함수 return_array()
$$로 text[][]를 반환합니다.
    return [['a"b','c,d'],['e\\f','g']];
$$ 언어 plperl;

return_array() 선택;

복합 유형 인수는 다음과 같이 함수에 전달됩니다. 해시에 대한 참조. 해시의 키는 속성입니다. 복합 유형의 이름. 예는 다음과 같습니다.

CREATE TABLE 직원(
    이름 텍스트,
    기본급 정수,
    보너스 정수
);

CREATE FUNCTION empcomp(employee)는 정수를 $$로 반환합니다.
    내 ($emp) = @_;
    $emp-basesalary + $emp-bonus를 반환합니다.
$$ 언어 plperl;

SELECT 이름, empcomp(employee.*) FROM 직원;

PL/Perl 함수는 다음을 사용하여 복합 유형 결과를 반환할 수 있습니다. 동일한 접근 방식: 다음을 갖는 해시에 대한 참조를 반환합니다. 필수 속성. 예를 들면:

CREATE TYPE testrowperl AS (f1 정수, f2 텍스트, f3 텍스트);

함수 생성 또는 교체 perl_row()는 testrowperl을 $$로 반환합니다.
    return f2 = '안녕하세요', f1 = 1, f3 = '세계';
$$ 언어 plperl;

SELECT * FROM perl_row();

선언된 결과 데이터 유형에 포함되지 않은 모든 열 해시에 존재하는 것은 null 값으로 반환됩니다.

PL/Perl 함수는 스칼라 또는 Perl 세트를 반환할 수도 있습니다. 복합 유형. 일반적으로 한 번에 하나씩 행을 반환하려고 합니다. 시작 시간을 단축하고 대기 시간을 방지하기 위해 전체 결과 세트를 메모리에 저장합니다. 당신은 이것을 할 수 있습니다return_next아래 그림과 같습니다. 마지막 이후에 참고하세요.return_next, 둘 중 하나를 입력해야 합니다.반환또는 (더 좋음)반환 undef.

함수 생성 또는 교체 perl_set_int(int)
SETOF 정수를 $$로 반환합니다.
    foreach (0..$_[0]) 
        return_next($_);

    undef를 반환;
$$ 언어 plperl;

SELECT * FROM perl_set_int(5);

함수 생성 또는 교체 perl_set()
SETOF testrowperl을 $$로 반환합니다.
    return_next( f1 = 1, f2 = '안녕하세요', f3 = '세계' );
    return_next( f1 = 2, f2 = '안녕하세요', f3 = 'PostgreSQL' );
    return_next( f1 = 3, f2 = '안녕하세요', f3 = 'PL/Perl' );
    undef를 반환;
$$ 언어 plperl;

작은 결과 세트의 경우 배열에 대한 참조를 반환할 수 있습니다. 스칼라, 배열에 대한 참조 또는 참조를 포함하는 단순 유형, 배열 유형 및 복합 유형에 대한 해시 각각. 다음은 반환에 대한 몇 가지 간단한 예입니다. 배열 참조로 설정된 전체 결과:

함수 생성 또는 교체 perl_set_int(int)는 SETOF 정수를 $$로 반환합니다.
    반환 [0..$_[0]];
$$ 언어 plperl;

SELECT * FROM perl_set_int(5);

함수 생성 또는 교체 perl_set()는 SETOF testrowperl을 $$로 반환합니다.
    반환 [
         f1 = 1, f2 = '안녕하세요', f3 = '세계' ,
         f1 = 2, f2 = '안녕하세요', f3 = 'PostgreSQL' ,
         f1 = 3, f2 = '안녕하세요', f3 = 'PL/Perl' 
    ];
$$ 언어 plperl;

SELECT * FROM perl_set();

다음을 사용하고 싶다면엄격프라그마 귀하의 코드에는 몇 가지 옵션이 있습니다. 임시 글로벌 사용의 경우 당신은 할 수 있습니다세트 pl무지개 토토.use_strict참입니다. 이는 영향을 미칠 것입니다 후속 편집물PL/펄기능이 있지만 이미 기능은 아님 현재 세션에서 컴파일되었습니다. 영구적으로 전역적으로 사용하려면 다음을 수행하십시오. 설정pl무지개 토토.use_strict참으로postgresql.conf파일.

특정 기능에 영구적으로 사용하려면 다음을 수행하면 됩니다. 넣어:

엄격한 사용;

함수 본문 상단에.

그특징pragma도 사용 가능 에사용Perl 버전이 다음인 경우 5.10.0 이상.