- 追加された行はこの色です。
- 削除された行はこの色です。
[[Perl]]
**インポート方法 [#w91c6628]
+データベース、ユーザ名、パスワードの設定
--mysql -u root -p
--create database データベース名;
--grant all on データベース名.* to ユーザ名@localhost identified by 'パスワード';
--flush privileges;
+作成したファイルをインポート
--mysql xxxdb < xxxdb.sql -u DBユーザ名 -p
**GSKの地名辞書をMySQLに格納する [#a17f5560]
**インポート用sqlファイルの作成方法 [#tb7f0635]
***GSKの地名辞書をMySQLに格納する [#a17f5560]
$file = $fileout = "chimei-utf8.csv";
$fileout =~ s/csv$//;
$fileout .= "sql";
open(IN,"$file");
open(OUT,">$fileout");
print OUT <<EOF;
CREATE TABLE `PlaceName` (
`id0` TEXT NOT NULL ,
`id1` TEXT NOT NULL ,
`id2` TEXT NOT NULL ,
`id3` TEXT NOT NULL ,
`id4` TEXT NOT NULL ,
`id5` TEXT NOT NULL ,
`id35` TEXT NOT NULL ,
`id36` TEXT NOT NULL ,
`id37` TEXT NOT NULL ,
`id38` TEXT NOT NULL
) ENGINE = MYISAM ;
EOF
while(<IN>){
chomp;
chop;
undef $content;
@tmp = split(/,/,$_);
for($i=0;$i<=5;$i++){
$content .= "\"$tmp[$i]\",";
}
for($i=35;$i<=38;$i++){
$content .= "\"$tmp[$i]\",";
}
chop $content;
print OUT "INSERT INTO `PlaceName` VALUES ($content);\n";
}
close(OUT);
close(IN);