[新手求助]perl连接mysql

cczj

小弟是菜鸟，但工作急需要写一个脚本查询数据库，哪位高人能指导一下小弟啊？
因为我是新手，一点也不懂perl希望能给我回答的详细些，请在以下几个方面帮我解答,万分感谢
1.perl连接mysql,都需要作那些，下载什么，怎么安装？
2.perl写出来的脚本是什么样的文件,例如xxx.xx,怎么运行看结果.
3.如果哪位大哥有耐心,可以给我写一个查询数据库的例子最好,呵呵有点贪心啦!
不论你回不回帖,对于你能看,我都表示感谢!!

cczj

忘了说一声,我是在linux下开发的

alexru

use DBI;
use DBD::Mysql;

atgc

给你个完整的例子
#!/usr/bin/perl
use DBI;
$dbh = DBI->connect("DBI:mysql:数据库名:192.168.1.1",'user','password');
$sth = $dbh->prepare("select chr,geneid from gene where chromosome=?");
$sth->execute('1');
while(@field = $sth->fetchrow)
{
        print "$field[0]\t$field[1]\n";
}

cczj

谢谢两位大哥的指点,万分感激