Perl script

Not sure if this is the right place, but...

I am evaluating a move from FoxPro to PostgreSQL.  So far, I like what I
see... alot.  But,  I have a data migration issue looming in the near
future that I need to address.  The pgAdmin tool is nice, and works okay
on small databases, but I need to migrate some tables with 200,000+
records each.  pgAdmin is too slow for this and it does not migrate the
primary keys and other indices.

So... is there a way to configure pgAdmin to migrate this much data and
grab the keys and indices?

Or has someone seen a Perl script that could be used to build an SQL DDL
script from a FoxPro database (or any ODBC datasource), and I can export
the data and use the PostgreSQL COPY command to load the data locally.