Greetings all,
Let me preface this post with the fact that I do not work with SQL2000 (Im more of an opensource proponent).
However if you are using DBI you can get the column names of any particular table: 
use strict;
use DBI;
my $dbh = DBI->connect('DBI:database_type:database_name','user','passw
+ord') || die DBI->errstr;
my $sth = $dbh->prepare("SELECT * FROM table_name WHERE 0=1") || die $
+dbh->errstr;
$sth->execute() || die $sth->errstr;
my @column_names = @{$sth->{NAME}};
$sth->finish();
$dbh->disconnect();

[download]
Now @column_names will contain the column names for your table.
Im sure it can be done a lot more elegantly then I have illustrated here, but thats a start.
As for a list of tables with the database...I have no suggestions. Im not sure about the behaviour of SQL2000 or even if there is support in DBI.
Hope that helps get you at least part of the way to your solution.
-injunjoel
UPDATE Added the $sth->execute();
Updated prepared query for portability(though I would hate to be the developer without access to LIMIT... InterBase anyone?)
Thanks to (jZed & mpeppler) for catching that.
-injunjoel

In reply to Re: Reading DB by injunjoel
in thread Reading DB by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.