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.