Hello,
I'm using the following show_users() function in order to retreive in
postgresql the output from the unix "ps" command.
When run directly from a shell, this code:
$ps = `ps -afux | grep postgres`;
@fields = split /\n/, $ps;
return "{" . join(",", @fields) . "}";
... runs fine.
But when run inside a plperlu function, lines are being truncated after
a certain width.
Is that a known limitation of plperlu? Or maybe something else?
Philippe
------------------------------------------------------------
-- TYPE: line_type
------------------------------------------------------------
CREATE TYPE public.line_type AS
(
line text
);
------------------------------------------------------------
-- UTILITY FUNCTION: ps
------------------------------------------------------------
CREATE FUNCTION public.ps()
RETURNS text[] AS
'
$ps = `ps -afux | grep postgres`;
@fields = split /\n/, $ps;
return "{" . join(",", @fields) . "}";
'
LANGUAGE 'plperlu' VOLATILE;
------------------------------------------------------------
-- UTILITY FUNCTION: show_users
------------------------------------------------------------
CREATE FUNCTION public.show_users()
RETURNS SETOF user_type AS
'
DECLARE
users text[];
user_rec line_type%ROWTYPE;
i int2;
BEGIN
users = ps();
FOR i IN 1 .. array_upper(users, 1) LOOP
user_rec.line = users[i];
RETURN NEXT user_rec;
END LOOP;
RETURN;
END
'
LANGUAGE 'plpgsql' VOLATILE;
------------------------------------------------------------
-- MAIN
------------------------------------------------------------
select * from show_users();
---------------------------(end of broadcast)---------------------------
TIP 8: explain analyze is your friend
