/
githubmirror
/
postgres
Обзор
Документация
Войти
/
githubmirror
/
postgres
Код
Запросы
0
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
src/pl/plperl/expected/plperlu.out
15 строк
618 B
Tom Lane
Rearrange the handling of error context reports.
05 сен 2015, 18:58
05 сен 2015, 18:58
0426f34
Код
Авторство
О чём код?
-- Use ONLY plperlu tests here. For plperl/plerlu combined tests -- see plperl_plperlu.sql -- This test tests setting on_plperlu_init after loading plperl LOAD 'plperl'; -- Test plperl.on_plperlu_init gets run SET plperl.on_plperlu_init = '$_SHARED{init} = 42'; DO $$ warn $_SHARED{init} $$ language plperlu; WARNING: 42 at line 1. -- -- Test compilation of unicode regex - regardless of locale. -- This code fails in plain plperl in a non-UTF8 database. -- CREATE OR REPLACE FUNCTION perl_unicode_regex(text) RETURNS INTEGER AS $$ return ($_[0] =~ /\x{263A}|happy/i) ? 1 : 0; # unicode smiley $$ LANGUAGE plperlu;