Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl 
    use utf8;
    ...
    $dbh2 = DBI->connect("dbi:SQLite:$PathCorpusDB2", "", "", { RaiseError
    + => 1, AutoCommit => 1, PrintError => 1 });
    my $AllDbText_ref2 = $dbh2->selectall_arrayref("SELECT filename FROM d
    +ata");
    $dbh2->disconnect;
    
  2. or download this
    D:\MyModule> perl .\UnicodeDatabaseConnect.pl
    Creating following database a/databaseTest1.db ...
    ...
    Creating following database ³/databaseTest2.db ...
    Connecting to ³/databaseTest2.db
    DBI connect('³/databaseTest2.db','',...) failed: unable to open databa
    +se file at .\UnicodeDatabaseConnect.pl line 27.