#! c:\program files\perl\bin
use DBI;
my $csv="viewmanifest.csv";
$dbh=DBI->connect('DBI:CSV:$csv') or die "Can't Connect";
$sth=$dbh->prepare("SELECT RowId, dahandle, darelativepath, dafilestate, dafilestatetime, dafilesource, fileguid, size, filemd5, child, childtype, childhandle, container, containerfolder, maghandle, mailcontainererror, mailcontainer, mailfolder, mailfolderpath, contentmd5, createdtime, datescanned, embeddedchildren, docclass, handle, docnum, osfolder, filename, docext, origdocext, filemode, fullpath, filetype, auxfiletype, lastaccesstime, lastmodifiedtime, lastchangetime, mimetype, kftdesc, ocrpath, ocrstatus, ownergroup, owneruser, acls, parent, parsingstatus, parserversion, altbody, importpath, importdevice, importarea, ancestordahandle, depotfile, inode, batch FROM $csv") or die "Can't prepare";
$sth->execute();
$sth->dump_results();
$sth->finish();
$dbh->disconnect();