Sure. Nothing but the truth. But the friendly manual I linked to isn’t about Perl. It is about SQLite. With the according driver DBD::SQLite and DBI I guess it should work. Probably with something like this:

use DBI;
my $dbh = DBI->connect("dbi:SQLite:dbname=$dbfile","","");
my $sth = $dbh->table_info(undef, $schema, $table, $type, \%attr);
…;
[download]

Uncomplete and not tested and it doesn’t compile, I know. And I suppressed or forgot the ugly details. As you like. The rest is left as an exercise to the reader.