perl新手询问:perl程序里头怎么访问远程一台

perl新手询问:perl程序里头怎么访问远程一台

perl新手询问:perl程序里头怎么访问远程一台
如题,我想请问各位大仙,perl程序里头怎么访问远程一台机器的MYsql数据库啊?需要安装什么必须的模块吗?还是perl的核心库里头就有这样的函数接口?如果需要安装模块,哪些是必须的? 才开始学perl,所以基础较差,请高手们不要笑话!
安装DBI,DBD::Mysql模块,就可以了。或者喜欢的话用CDBI或者DBIx。
那请问,除了perl中需要安装这个模块外,还需要在系统中安装其他的支持Mysql的模块吗?比如在JAVA中,就需要安装Mysq的jdbcl驱动..
安装DBI,DBD::Mysql模块,就可以了。或者喜欢的话用CDBI或者DBIx。
我安装不成功啊,在make te.
我安装不成功啊,在make test的时候报错误.请问这是什么原因啊?
另说明一下:我安装perl的主机上没有安装MYsql数据库,我是想远程访问另一台机器上的MYsql数据库,我用的perl模块版本是 DBD-mysql-3.0008.tar.gz
现在情况是,我在编译 DBD-.
现在情况是,我在编译 DBD-mysql-3.0008模块的时候,报下面的错误:

Can't locate DBI/DBD.pm in @INC (@INC contains: /opt/glite/lib/perl5 /opt/gpt/lib/perl/i386-linux-thread-multi /opt/gpt/lib/perl /opt/gpt/lib/perl/i386-linux-thread-multi /opt/gpt/lib/perl /usr/lib/perl5/5.8.0/i386-linux-thread-multi /usr/lib/perl5/5.8.0 /usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.0 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.0 /usr/lib/perl5/vendor_perl /usr/lib/perl5/5.8.0/i386-linux-thread-multi /usr/lib/perl5/5.8.0 .) at Makefile.PL line 23.
现在是当我运行这个程序的.
现在是当我运行这个程序的时候:
#!/usr/bin/perl -w
use strict;
use DBI;
#定义数据库名称;
my $database_name = "cngridagentlevel;host=159.226.49.53";
# 定DBI联接语句;
my $database ="dbi:mysql:dbname=$database_name";
#定义用户名、口令;
my $db_user = "globus";
my $db_password = "123456";
### 连接.
my $dbh=DBI->connect($database,$db_user,$db_password) or die "can't connect!";
if ($dbh)
{
print "mysqlconnect ok!\n";
print "my $dbh->port();\n";
}
else
{print "mysqlconnect false!\n";
}
##$dbh=DBI->disconnect;
整个程序就停顿在那里不退出,这是为什么?,而且我在安装DBD-mysql的时候,make test也没过去
我想测试一下我的DBD-Mysq.
我想测试一下我的DBD-Mysql是否安装成功,但为什么报这个错?
[b][root@jsi DBD-mysql-3.0008]# perl -MDBD -e1
Can't locate DBD.pm in @INC (@INC contains: /usr/lib/perl5/site_perl/5.8.6/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.4/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.3/i386-linux-thread-multi /usr/lib/perl5/site_perl/5.8.6 /usr/lib/perl5/site_perl/5.8.5 /usr/lib/perl5/site_perl/5.8.4 /usr/lib/perl5/site_perl/5.8.3 /usr/lib/perl5/site_perl /usr/lib/perl5/vendor_perl/5.8.6/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.4/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.3/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.8.6 /usr/lib/perl5/vendor_perl/5.8.5 /usr/lib/perl5/vendor_perl/5.8.4 /usr/lib/perl5/vendor_perl/5.8.3 /usr/lib/perl5/vendor_perl /usr/lib/perl5/5.8.6/i386-linux-thread-multi /usr/lib/perl5/5.8.6 .).
BEGIN failed--compilation aborted.[/b]
再麻烦一下,现在我想测试一下是否能连上另一台主机的mysql数据库,那台主机的IP为159.226.49.53端口为3306,数据库名为agentlevel,用户名和密码都为test
我自己写了一段测试的代码,如下,但一运行就整个停顿在那里,不退出,也没有任何输出,只能强行退出,所以求救这里的达人,谁能帮我解决这个问题,谢谢了先!
#!usr/bin/perl -w
use strict;
use DBI;
#定义数据库名称;
my $database_name = "agentlevel;host=159.226.49.53;port=3306";
# 定DBI联接语句;
my $database ="dbi:mysql:dbname=$database_name";
#定义用户名、口令;
my $db_user = "test";
my $db_password = "test";
### 连接.
my $dbh=DBI->connect($database,$db_user,$db_password) or die "can't connect!";
if ($dbh)
{
print "mysqlconnect ok!\n";
print "my $dbh->port();\n";
}
else
{print "mysqlconnect false!\n";
}
##$dbh=DBI->disconnect;
请问你的系统是什么? 如果.
查看模块是否安装 perl -e 'use DBD::mysql' 或者 perl -MDBD::mysql -e 1

请问你的系统是什么? 如果是 windows 的话是不是安装了防火墙类的软件?
另外,远端的那台数据库机器上是否也有防火墙?