gpt4 book ai didi

linux下perl操作mysql数据库(需要安装DBI)

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 28 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章linux下perl操作mysql数据库(需要安装DBI)由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

DBI安装:DBI详细信息参考:http://dbi.perl.org/  1.下载DBI包:  wget http://search.cpan.org/CPAN/authors/id/T/TI/TIMB/DBI-1.620.tar.gz  2 解压  tar xzf DBI-1.620.tar.gz  3 进入解压包内,  perl Makefile.PL  4 make test  5 make  6 make install (如果不是root用户,要sudo一下)  DBD安装:  1.下载DBD  wget http://search.cpan.org/CPAN/authors/id/C/CA/CAPTTOFU/DBD-mysql-4.021.tar.gz  2. 3. 同上  在进行第三步是可能会出现mysql_config找不到的情况,应该是没有安装开发工具包  sudo apt-get install libmysqld-dev  sudo apt-get install libmysqlclient-dev  来安装这两个包。  其余同上。  完成安装后就可以利用perl脚本进行mysql数据的操作了。  编写perl脚本操作数据库  。

复制代码代码如下

#! /usr/bin/perl  use DBI;  my $driver="DBI:mysql";  my $database="perl_test";  my $user="root";  my $host="localhost";  my $passwd="root";  my $rules="alert_rules";  my $dbh = DBI->connect("$driver:database=$database;host=$host;user=$user;password=$passwd")  or die "Can't connect: " . DBI->errstr;  my $sth=$dbh->prepare("select app_name,receivers from $rules ");  $sth->execute() or die "Can't prepare sql statement". $sth->errstr;  my $sth=$dbh->prepare("select app_name,receivers from $rules ");  $sth->execute() or die "Can't prepare sql statement". $sth->errstr;  # 打印获取的数据  while(@recs=$sth->fetchrow_array){  print $recs[0].":".$recs[1]."\n";  }  $sth->finish();  $dbh->disconnect();  。

最后此篇关于linux下perl操作mysql数据库(需要安装DBI)的文章就讲到这里了,如果你想了解更多关于linux下perl操作mysql数据库(需要安装DBI)的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

28 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com