大家写过读过的perl项目最多有多少行代码

兰花仙子

er,这个1.1版也还有2个问题：

1. die "cannot connect to Oracle:$!\n";
出错信息不应该用$!捕获，而是放在DBI自带的变量$DBI::errstr里。

2. $sth->finish应该放在while循环里，代表一个SQL事件的结束，不应该跟$dbh->disconnect放在一起。

hoowa

www.freeiris.org的中文开源通信项目。其中web部分是php做的，主要是php的人还稍微好找一些。 后端连接通信的部分基本上是Perl来做的，因为那部分程序一般人也写不明白。
代码量大约说不好，反正也不少好象。
使用率很高。现在很多地方的通信系统使用的都是这套。

Ray001

er,这个1.1版也还有2个问题：

1. die "cannot connect to Oracle!\n";
出错信息不应该用$!捕获，而是 ...
兰花仙子 发表于 2010-02-05 11:55

改了。谢谢仙子！

兰花仙子

呵呵Ray~ 偶没仔细留意你把$sth=$dbh->prepare放到while外了。
那么$sth->finish就确实应该跟$dbh->disconnect一起，也放到while外。
being sorry~~~再改回来吧~

gdutllf2006

佩服

zhumao

想缩短应该是没问题的，关键是没有多大意义啊
cobrawgl 发表于 2010-02-05 11:43

这里只是列举了几个字段，marc记录里面字段、子字段很多的，所以要灌水（Perl程序）的话，还是能写的很长的。

hitsubunnu

的中文开源通信项目。其中web部分是php做的，主要是php的人还稍微好找一些。 后端连接通信的部分基本上是Pe ...
hoowa 发表于 2010-02-05 11:58

这个就是 Asterisk + perl调用api

Asterisk本身是c实现的吧 只要看得懂文档就行 是用perl调用还是用c调用都一样 为啥一般人写不明白？

xti9er

回复 35# folklore


一行

    perl -e "print qq/Hello World\n/"

wind_ch

LZ可以把25楼回复的某些部分编辑到帖子里， 引导本贴向更有意义的方向讨论。

wxlfh

学习了，都是高手。