【专题交流】我今天又偷懒了

能不能请大家说点自己用perl"偷懒"的实际例子.

这个想法很不错，我另开辟一项专题，希望能够有所积累。

本帖定位：
大家在工作中碰到了什么小问题，本来可以用其它方法解决了，但是你用 Perl 解决了，节省了时间，提高了工作效率，那么请把该事件在这里做一个简单的描述。
注意：本帖侧重于展现 Perl 是如何帮助你工作的，因此不要在这里交流那些本来就应该用 Perl 去做的事情，比如你用 Perl 做了个 CGI。

定位太准确了,我就是想知道这个问题.呵呵.

顶
本人系统管理员，写程序没天赋，所以什么方法最快解决问题用什么，发现perl最合适
最开始是用perl来管理网络设备，给交换机配置ACL，配置防火墙什么的，几千条没几分钟就搞定了，爽

本人Perl新手，开发主要是C/C++，不喜欢Amarok，用perl写了个从网上下歌词的脚本，加上FvwmScript，就可以在任务栏显示歌词了，虽然脚本写的很垃圾，但跑起来也没什么大问题。

如果用C/C++，就得写XMMS的插件了，还得写界面，头都大了。

发现perl不愧是胶水语言哈，libxmms， libmp3都有接口，各种类库支持都有，偷懒第一选择。

用来周末挂机。
周末一般都通宵上网， 有时提前上床后就需要设定自动关机时间。
1. 如果网断了就关机
2. bitcomet下载完了也要关机(bitcomet本身不提供这个选项)
3. 时间到了也要关。
网上的自动关机软件不能满足我的要求， 结果用Perl捣鼓了一会儿就好了。

大的就不说了，说说小的，偶有个DNS服务器要管，因为是策略式的（根据来访的IP自动分配网站的IP以适应电信和网通的线路），一旦策略设置错误那么可能分配出去的IP会访问的非常慢，于是作了一个程序查询Log当中的IP所属运营商，如果发现有错的自动生成相应的文件，我定期审核一下然后合并到配置文件当中就可以了

你们都超强啊，我在想,怎么偷懒能把perl学会了

曾经用perl编了几个cgi程序分析彩票数据玩，apache做服务器，浏览器显示结果。可惜没有分析出什么结果，其实也是个perl学习过程。我主要是在取数的方面偷了一小懒，以前都是用浏览器打开有关网页，比较现有数据看缺哪几期数据，然后一一复制、粘贴、整理、存盘，最后手工将数据文件发送到几个信箱。现在用perl编写了一个程序，这一切自动完成：抓取网页，判断缺几期数据，然后提取所需数据，进行整理，存盘，最后将数据文件发送到指定的几个信箱。