| BEGIN { |
| use File::Basename; |
| my $THISDIR = dirname $0; |
| unshift @INC, $THISDIR; |
| require "testp2pt.pl"; |
| import TestPodIncPlainText; |
| } |
| |
| my %options = map { $_ => 1 } @ARGV; ## convert cmdline to options-hash |
| my $passed = testpodplaintext \%options, $0; |
| exit( ($passed == 1) ? 0 : -1 ) unless $ENV{HARNESS_ACTIVE}; |
| |
| |
| __END__ |
| |
| |
| ==head1 NAME |
| B<rdb2pg> - insert an rdb table into a PostgreSQL database |
| |
| ==head1 SYNOPSIS |
| B<rdb2pg> [I<param>=I<value> ...] |
| |
| ==head1 PARAMETERS |
| B<rdb2pg> uses an IRAF-compatible parameter interface. |
| A template parameter file is in F</proj/axaf/simul/lib/uparm/rdb2pg.par>. |
| |
| ==over 4 |
| ==item B<input> I<file> |
| The B<RDB> file to insert into the database. If the given name |
| is the string C<stdin>, it reads from the UNIX standard input stream. |
| |
| ==back |
| |
| ==head1 DESCRIPTION |
| B<rdb2pg> will enter the data from an B<RDB> database into a |
| PostgreSQL database table, optionally creating the database and the |
| table if they do not exist. It automatically determines the |
| PostgreSQL data type from the column definition in the B<RDB> file, |
| but may be overriden via a series of definition files or directly |
| via one of its parameters. |
| |
| The target database and table are specified by the C<db> and C<table> |
| parameters. If they do not exist, and the C<createdb> parameter is |
| set, they will be created. Table field definitions are determined |
| in the following order: |
| |