Perl을 사용하여 $ dbh에 다른 sqlite db를 연결하는 방법 dbd-sqlite

Question

여러개의 sqlite 데이터베이스를 Perl의 $ dbh에 연결하는 방법은 무엇입니까? 명령 줄에서 대화 형 sqlite3 rpel에 연결할 수 있습니다. Perl에서 dbd-sqlite를 사용하는 것이 어떻습니까?

죄송합니다. 이미 여기에 이미 답변이 있다면 perlmonks 또는 유사하지만 적절한 답변을 찾을 수 없습니다.

Answer 1

do은 임의의 SQL 문을 실행합니다.

$dbh->do('attach foobar as foobar'); 

foobar의 테이블을 쿼리 할 수 ​​있습니다.

Answer 2

당신은이 작업을 수행 할 수 있습니다

use DBI; 
my $dbfile1 = 'test1.db'; # will be `main` 
my $dbfile2 = 'test2.db'; # will attach as `other` 
my $dbh = DBI->connect("dbi:SQLite:dbname=$dbfile1","","") or die "dbh"; 
$dbh->do('attach ? as ?', undef, $dbfile2, 'other') or die "attach";