Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
Postgres FD Implementation
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Abuhujair Javed
Postgres FD Implementation
Commits
234776db
Commit
234776db
authored
Jun 02, 1997
by
Edmund Mergl
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
*** empty log message ***
parent
09e41a03
Changes
10
Show whitespace changes
Inline
Side-by-side
Showing
10 changed files
with
59 additions
and
21 deletions
+59
-21
src/interfaces/perl5/ApachePg.pl
src/interfaces/perl5/ApachePg.pl
+4
-4
src/interfaces/perl5/Changes
src/interfaces/perl5/Changes
+1
-1
src/interfaces/perl5/Makefile.PL
src/interfaces/perl5/Makefile.PL
+1
-1
src/interfaces/perl5/Pg.pm
src/interfaces/perl5/Pg.pm
+2
-2
src/interfaces/perl5/Pg.xs
src/interfaces/perl5/Pg.xs
+25
-1
src/interfaces/perl5/README
src/interfaces/perl5/README
+19
-8
src/interfaces/perl5/test.pl
src/interfaces/perl5/test.pl
+2
-1
src/interfaces/perl5/test.pl.newstyle
src/interfaces/perl5/test.pl.newstyle
+2
-1
src/interfaces/perl5/test.pl.oldstyle
src/interfaces/perl5/test.pl.oldstyle
+2
-1
src/interfaces/perl5/typemap
src/interfaces/perl5/typemap
+1
-1
No files found.
src/interfaces/perl5/ApachePg.pl
View file @
234776db
...
...
@@ -2,11 +2,11 @@
# demo script, has been tested with:
# - Postgres-6.1
# - apache_1.2
b8
# - mod_perl-
0.97
# - perl5.00
3_93
# - apache_1.2
# - mod_perl-
1.0
# - perl5.00
4
use
CGI
::
Apache
;
use
CGI
;
use
Pg
;
use
strict
;
...
...
src/interfaces/perl5/Changes
View file @
234776db
...
...
@@ -51,7 +51,7 @@ Revision history for Perl extension Pg.
- changed test.pl for large objects:
test only lo_import and lo_export
1.6.
0 Apr 29,
1997
1.6.
1 Jun 02
1997
- renamed to pgsql_perl5
- adapted to PostgreSQL-6.1
- test only functions, which are also
...
...
src/interfaces/perl5/Makefile.PL
View file @
234776db
#-------------------------------------------------------
#
# $Id: Makefile.PL,v 1.
1.1.1 1997/04/29 19:37:0
9 mergl Exp $
# $Id: Makefile.PL,v 1.
2 1997/06/02 19:41:5
9 mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
src/interfaces/perl5/Pg.pm
View file @
234776db
#-------------------------------------------------------
#
# $Id: Pg.pm,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: Pg.pm,v 1.
2 1997/06/02 19:42:01
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
@@ -83,7 +83,7 @@ require 5.003;
PGRES_InvalidOid
)
;
$VERSION
=
'
1.6.
0
';
$VERSION
=
'
1.6.
1
';
sub
AUTOLOAD
{
# This AUTOLOAD is used to 'autoload' constants from the constant()
...
...
src/interfaces/perl5/Pg.xs
View file @
234776db
/*-------------------------------------------------------
*
* $Id: Pg.xs,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
* $Id: Pg.xs,v 1.
2 1997/06/02 19:42:03
mergl Exp $
*
* Copyright (c) 1997 Edmund Mergl
*
...
...
@@ -424,6 +424,18 @@ PQclear(res)
PGresult * res
void
PQdisplayTuples(res, fp, fillAlign, fieldSep, printHeader, quiet)
PGresult * res
FILE * fp
int fillAlign
char * fieldSep
int printHeader
int quiet
CODE:
PQdisplayTuples(res, fp, fillAlign, (const char *)fieldSep, printHeader, quiet);
void
PQprintTuples(res, fout, printAttName, terseOutput, width)
PGresult * res
...
...
@@ -904,6 +916,18 @@ PQgetisnull(res, tup_num, field_num)
int field_num
void
PQdisplayTuples(res, fp, fillAlign, fieldSep, printHeader, quiet)
PGresult * res
FILE * fp
int fillAlign
char * fieldSep
int printHeader
int quiet
CODE:
PQdisplayTuples(res, fp, fillAlign, (const char *)fieldSep, printHeader, quiet);
void
PQprintTuples(res, fout, printAttName, terseOutput, width)
PG_result res
...
...
src/interfaces/perl5/README
View file @
234776db
#-------------------------------------------------------
#
# $Id: README,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: README,v 1.
2 1997/06/02 19:42:05
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
@@ -25,13 +25,17 @@ programmers.
COPYRIGHT INFO
--------------
COPYRIGHT:
----------
This program is free software; you can redistribute it and/or modify
it under the terms of either:
a) the GNU General Public License as published by the Free
Software Foundation; or
b) the "Artistic License", as specified in the Perl README file.
This Postgres-Perl interface is copyright 1996, 1997 Edmund Mergl. You are
free to use it for any purpose, commercial or noncommercial, provided
that if you redistribute the source code, this statement of copyright
remains attached.
IF YOU HAVE PROBLEMS:
...
...
@@ -98,8 +102,15 @@ If you have compile errors like "XS_VERSION_BOOTCHECK undeclared", make a
If this file is not present, you need to recompile and reinstall perl.
DOCUMENTATION:
--------------
Detailed documentation can be found in Pg.pm. Use 'perldoc Pg' after
installation to read the documentation.
---------------------------------------------------------------------------
Edmund Mergl <E.Mergl@bawue.de>
April 29
, 1997
Edmund Mergl <E.Mergl@bawue.de>
June 02
, 1997
---------------------------------------------------------------------------
src/interfaces/perl5/test.pl
View file @
234776db
#-------------------------------------------------------
#
# $Id: test.pl,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: test.pl,v 1.
2 1997/06/02 19:42:07
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
@@ -65,6 +65,7 @@ $| = 1;
# getisnull
# print
# notifies
# displayTuples
# printTuples
# lo_import
# lo_export
...
...
src/interfaces/perl5/test.pl.newstyle
View file @
234776db
#-------------------------------------------------------
#
# $Id: test.pl.newstyle,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: test.pl.newstyle,v 1.
2 1997/06/02 19:42:11
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
@@ -68,6 +68,7 @@ $| = 1;
# tty
# getlength
# getisnull
# displayTuples
# printTuples
# lo_open
# lo_close
...
...
src/interfaces/perl5/test.pl.oldstyle
View file @
234776db
#-------------------------------------------------------
#
# $Id: test.pl.oldstyle,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: test.pl.oldstyle,v 1.
2 1997/06/02 19:42:13
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
@@ -68,6 +68,7 @@ $| = 1;
# PQtty()
# PQgetlength()
# PQgetisnull()
# PQdisplayTuples()
# PQprintTuples()
# PQlo_open()
# PQlo_close()
...
...
src/interfaces/perl5/typemap
View file @
234776db
#-------------------------------------------------------
#
# $Id: typemap,v 1.
1.1.1 1997/04/29 19:37:10
mergl Exp $
# $Id: typemap,v 1.
2 1997/06/02 19:42:14
mergl Exp $
#
# Copyright (c) 1997 Edmund Mergl
#
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment