Win32环境下 Perl DBI安装

环境建立

安装MySQL  5.0
Win32环境下安装Active Perl,默认安装中是不包含DBI数据库包的,以在
http://ppm.activestate.com/PPMPackages/zips
下载对应的Perl模块,解压缩后用ppm install DBI.ppd命令安装

注意版本必须与Active Perl一致,否则安装会出错,
出错信息大意"(无法找到合适的安装目标)"

安装顺序必须先安装DBI模块,而后是DBD-Mysql包.

尽量安装较新的DBD-MySQL包,较早的DBD-MySQL connect MySQL5时可能失败,提示不支持server要求的认证功能.

测试用程序
use DBI;
my $dbh = DBI->connect('dbi:mysql:database=mysql;hostname=localhost;port=3306',"root","password")
   or die "Something wrong when connecting to MySQL: $DBI::errstr/n";
print $dbh;
$dbh->disconnect;

连接本地的服务器上的mysql数据库,而后关闭这个连接
connect可能有如下几种格式
$dbh = DBI->connect("DBI:mysql:$database", $user, $password);
$dbh = DBI->connect("DBI:mysql:$database:$hostname",
                    $user, $password);
$dbh = DBI->connect("DBI:mysql:$database:$hostname:$port",
                    $user, $password);

如果用户名或口令未定义,DBI分别使用DBI_USER和DBI_PASS环境变量的值。如果你不指定主机名,它缺省为'localhost'。如果你不指定一个端口号,它缺省为MySQL的缺省端口(3306)。


在连接上数据库之后,创建新的database
my $statement = "create database ptdgtest;";
$rv = $dbh->do($statement)
        or die "Can't execute $statement: $dbh- >errstr/n"; 

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值