Select Code to Download

use utf8;
use Win32;
$dir="Małretuzz";
print our $short_path_dir = Win32::GetShortPathName( "$dir" );

use utf8;
use Win32;
...
my $dbh = DBI->connect("dbi:SQLite:$path_and_database","","", {});
$dbh->do( "CREATE TABLE table( ID INTEGER PRIMARY KEY, POS, simple)" )
+;
$dbh->disconnect;