Re: TR: interface PERL and return results

Bonjour (you speak french ? ;-) )

Thanks for your response,
Indeed I confused two commands copy (libpq) and \copy (psql).

I have try two methods for charge my result.res in my table.

the first method :

$res = $db->exec(" COPY temp FROM "full path\result.res ");

Unfortunately I did not succeed in using this method, I had always an
error ( While placing postgres in debug mode ).

DEBUG: StartTransactionCommand
DEBUG: query: COPY temp FROM '-- my path -- /result.res'
DEBUG: parse tree: { QUERY :command 5 :utility ? :resultRelation 0 :into <> :isPortal false :isBinary false :isTemp false :hasAggs false :hasSubLinks false :rtable <> :jointree <> :rowMarks () :targetList <> :groupClause <> :havingQual <> :distinctClause <> :sortClause <> :limitOffset <> :limitCount <> :setOperations <> :resultRelations ()}
DEBUG: ProcessUtility: COPY temp FROM '-- my path -- /result.res'
ERROR: You must have Postgres superuser privilege to do a COPY directly to or from a file. Anyone can COPY to stdout or from stdin. Psql's \copy command also works for anyone.
....

I don't understand why this error because the superuser postgres (who had create for launch the server) have the privilege
for access and read this file.

The second method :

$res = $db->exec('COPY temp FROM stdin');

open (FIC,'<result.res');
while (<FIC>) {
$db->putline($_);
}
$db->putline("\\.\n");
close(FIC);
print $res->resultStatus;

This method works with success, but i have some questions.

- print $res->resultStatus; print PGRES_COPY_IN
But i don't kown if the action of copy achieve its goal or no. I post this question because i has tested this case
after insert an row error on file and the response had the same.

Documentation indicates that one would have to be inserted a command $res = $db->endcopy for synchronize the copy
instruction. But when i use this instruction at end of my code., the prog perl blocks itself and if i kill, the operation of copy
fails on postgres.
If i omit this instruction the process works fine. Must I use or not this instruction ?

Victor

>
>
> Bonjour,
>
> On Mon, 7 Oct 2002, [utf-8] victor3(dot)lopes(at)voila(dot)fr wrote:
>
> > Hello no one has a solution for my problem :-) ?
> >
> >
> > ---------- Entête Initiale -----------
> >
> > De : "victor3(dot)lopes(at)voila(dot)fr" <victor3(dot)lopes(at)voila(dot)fr>
> > A : "pgsql-interfaces" <pgsql-interfaces(at)postgresql(dot)org>
> > Copie :
> > Date : Sat, 5 Oct 2002 23:31:40 +0200
> > Objet : interface PERL and return results
> >
> > Hello,
> > I use Perl Pg interface to join my postgresql database.
> >
> > I wan't send the below query in perl :
> >
> > $res = $db->exec(' create table temp (....); \copy temp from result.res');
>
> The \copy is a psql command. You need to use just the word 'copy' without the
> leading '\'.
>
> Using:
>
> COPY temp FROM /path/to/result.res
>
> will try and read result.res from a file on the server system. To load a file
> on your client system you should use COPY temp FROM STDIN and read the Pg
> manpage.
>
> Documentation:
>
> http://developer.postgresql.org/docs/postgres/sql-copy.html
>
> and
>
> man Pg
>
> search for 'copy' in the second of these to get a good starting point on the
> subject.
>
>
> --
> Nigel J. Andrews
> Director
>
> ---
> Logictree Systems Limited
> Computer Consultants
>
>
>
------------------------------------------

Faites un voeu et puis Voila ! www.voila.fr