Select Code to Download

#!/usr/bin/perl -w
use Class::DBI::Loader;
...

__END__
<data follows here, but is besides the point...>

Use of uninitialized value in split at /usr/lib/perl5/site_perl/5.8.5/
+Class/DBI/Pg.pm line 26.
"location" has no primary key at /usr/lib/perl5/site_perl/5.8.5/Class/
+DBI/Loader/Generic.pm line 164

create table location (
        location_id    serial not null primary key,
        location_name   text not null
);

SELECT indkey FROM ${catalog}pg_index
WHERE indisprimary=true AND indrelid=(
SELECT oid FROM ${catalog}pg_class
WHERE relname = ?)

peter_bcdc=# SELECT indkey FROM pg_catalog.pg_index
WHERE indisprimary=true AND indrelid=(
...
--------
 1
(1 row)

event_class
event_date
...
instructor_type_map
"location"