Реализую достаточно традиционную задачу по перекачке файла с клиента на сервер, с положением его на сервере в виде файла.

Файл передается на сервер в виде lo.

Дальше на сервере пытаюсь сохранить lo в файл.

CREATE OR REPLACE FUNCTION "public"."reply_copy_rses" (integer, oid) RETURNS integer AS
$body$
my $rses_id = $_[0];
my $dir = spi_exec_query('select current_setting(\'data_directory\')')->{rows}[0]->{current_setting}.'/base/';
my $zip_file = "$dir$rses_id.zip";
spi_exec_query("select lo_export ($_[1], \'$zip_file\')");

return $rses_id;
$body$
LANGUAGE 'plperlu' VOLATILE CALLED ON NULL INPUT SECURITY INVOKER;

Но этот код будет работать только если подсоединяться пользователем с правами superuser, что по соображениям безопасности мне не подходит.
А как сделать сохранение lo на сервере не под superuser?
Использование bytea не подходит по соображениям минимизации трафика.

Имеется ввиду
GRANT EXECUTE ON FUNCTION "pg_catalog"."lo_export"(oid, text) TO "my_liber_user"; ?
Не помогает, в логе все равно
error from Perl function "reply_copy_rses": must be superuser to use server-side lo_export() at line 11.

Может кто посоветует как сохранить lo в файл зная OID на сервере какими иными средствами используя plperlu или plperlu ?

Спасибо! Понятно.. Как всегда все написано в документации :-)
http://www.postgresql.org/docs/8.3/interactive/sql-createfunction.html