perlsub

Поиск
Список
Период
Сортировка
От Nabil Sayegh
Тема perlsub
Дата
Msg-id 3F7E063C.3040909@e-trolley.de
обсуждение исходный текст
Ответы Re: perlsub  (Oliver Elphick <olly@lfix.co.uk>)
Re: perlsub  (Martin_vi_Lange@t-online.de (Martin Lange))
Список pgsql-novice
Hello again,

now that perlsub works i need to know how backreferences work with
plperl. $1 - $9 doesn't work. Any idea ?

perlsub:
-----------------------------------------------
CREATE FUNCTION perlsub(text, text, text) RETURNS text AS '
     my ($data, $pat, $repl) = @_;
     $data =~ s/$pat/$repl/;
     return $data
' LANGUAGE 'plperl';
-----------------------------------------------

SELECT perlsub('a=b','([^=]+)=(.+)','key:$1;val:$2');

Any idea ? Just a matter of quoting ?
Also this example doesn't work with * instead of + :(

TIA
--
  e-Trolley Sayegh & John, Nabil Sayegh
  Tel.: 0700 etrolley /// 0700 38765539
  Fax.: +49 69 8299381-8
  PGP : http://www.e-trolley.de


В списке pgsql-novice по дате отправления:

Предыдущее
От: Nabil Sayegh
Дата:
Сообщение: Re: plperl db crash
Следующее
От: Oliver Elphick
Дата:
Сообщение: Re: perlsub