![](https://img-blog.csdnimg.cn/20201014180756916.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
mysql
monicholas
这个作者很懒,什么都没留下…
展开
-
用perl语言mysql 检查数据库是否存在并删除
#!/bin/perl use DBI; use strict; my $dbh = DBI->connect("DBI:mysql:host=XXX", "XXX", "XXX",{'RaiseError' => 1}); //连接数据库 $dbh -> do("DROP database if exists mo原创 2012-04-13 14:39:31 · 374 阅读 · 0 评论 -
perl mysql
#!/usr/bin/perl 2 use DBI; #启用DBI接口 3 use strict; 4 5 my $dbh = DBI->connect("DBI:mysql:host=localhost", 6 "root", "PWD",{'RaiseError' => 1}); 7 #建库原创 2014-08-02 18:06:45 · 552 阅读 · 0 评论