File: jsonb_plperlu--1.0.sql

package info (click to toggle)
postgresql-13 13.16-0%2Bdeb11u1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 153,784 kB
  • sloc: ansic: 876,381; sql: 94,589; yacc: 33,895; xml: 31,046; perl: 30,722; lex: 8,840; makefile: 6,072; sh: 4,877; cpp: 746; python: 158; asm: 65; sed: 16
file content (19 lines) | stat: -rw-r--r-- 704 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
/* contrib/jsonb_plperl/jsonb_plperlu--1.0.sql */

-- complain if script is sourced in psql, rather than via CREATE EXTENSION
\echo Use "CREATE EXTENSION jsonb_plperlu" to load this file. \quit

CREATE FUNCTION jsonb_to_plperlu(val internal) RETURNS internal
LANGUAGE C STRICT IMMUTABLE
AS 'MODULE_PATHNAME', 'jsonb_to_plperl';

CREATE FUNCTION plperlu_to_jsonb(val internal) RETURNS jsonb
LANGUAGE C STRICT IMMUTABLE
AS 'MODULE_PATHNAME', 'plperl_to_jsonb';

CREATE TRANSFORM FOR jsonb LANGUAGE plperlu (
    FROM SQL WITH FUNCTION jsonb_to_plperlu(internal),
    TO SQL WITH FUNCTION plperlu_to_jsonb(internal)
);

COMMENT ON TRANSFORM FOR jsonb LANGUAGE plperlu IS 'transform between jsonb and Perl';