How can I connect to a Lotus Notes database (*.nsf) with Perl and DBI?

I've got a Perl/DBI program that nee开发者_C百科ds to connect to a Lotus Notes database. With NotesSQL installed, the program works, but keeps prompting me for a Notes password. Is there any way to pass the Notes ID and password programmatically? I'm using ActiveState Perl 5.8.8, Notes 8.5, and NotesSQL 8.0.

See DBI->connect:

$dbh = DBI->connect($data_source, $username, $password)
        or die $DBI::errstr;   

or

$dbh = DBI->connect($data_source, $username, $password, \%attr)
        or die $DBI::errstr;