foreign key perl code - Mailing list pgsql-general

From mikeo
Subject foreign key perl code
Date
Msg-id 3.0.1.32.20000807172319.00ad8680@pop.spectrumtelecorp.com
Whole thread Raw
List pgsql-general
for those who copied that foreign key delete program
that i included earlier,  i fat fingered on one line
and if you try to delete just one fkey it'll delete
them all...

in the sub delete_entries()

the line if ($#dbsel > 0) {

needs to be changed to:

 if ($#dbsel >= 0) {


my apologies,
  mikeo

pgsql-general by date:

Previous
From: "Len Morgan"
Date:
Subject: Fw: pg_dump help
Next
From:
Date:
Subject: Re: foreign keys