Conversión de funciones de tabla simple en lenguaje Perl

El código de la función escalar en lenguajePerl puede reutilizarse como una simple función de tabla realizando pequeñas modificaciones en el registro.

Código

El código es el mismo que se encuentra en la sección de funciones escalares del lenguajePerl.

virtual

Despliegue el script siguiendo los mismos pasos que en la sección de funciones escalares en lenguajePerl.
$NZ_EXPORT_DIR/ae/utilities/bin/compile_ae --language perl --version 3 \
--template deploy ApplyOp.pm

Registro

Registre los ejecutables utilizando el comando modificado, que cambia ' --template, ' --return y ' --sig ' para que sean los adecuados para una función de tabla:
$NZ_EXPORT_DIR/ae/utilities/bin/register_ae --language perl --version 3 \
--template udtf --exe ApplyOp.pm \
--sig "applyopPl_table(varchar(1), int4, int4)" \
--return "table(result int4)"

En ejecución

Ahora se puede ejecutar el AE en SQL en la base de datos del sistema:
SELECT * FROM TABLE WITH FINAL(applyopPl_table('+', 4, 5));
RESULT
--------
9
(1 row)