摘要: 在工作中,经常需要将网页上的大块大块的标准化的内容下载下来。这个时候,没有什么比编写个脚本更方便的了。为什么选择Perl来做,主要还是Perl在文本处理方面有着天然的优势。以最近同事让我做的下载加油站网站作为例子,加油站的网址是:http://www.cheduoshao.com/gas/1/,同事想把加油站的名称和地址,下载下来,要一个一个粘贴太没效率了。做这个事情的大概顺序是:1,Perl既然是初学,首先要会用Perl,如果会的话,可以跳过这部分。如果不会也没关系,先安装一下,在网上搜ActivePerl的win32安装包,一路下一步就好了。怎么运行呢,拿记事本写个Perl程序,保存到D盘 阅读全文
posted @ 2013-01-16 22:45 zhaofei_001 阅读(3778) 评论(0) 推荐(0) 编辑
摘要: 公司组织架构调整比较频繁,AD里组织架构经常变动,要维护1400多个动态通讯组,经常是花时间建这些东西。这两天做了个半自动的脚本,基本算是解决了这个问题。大体思路是:1,批处理里面,使用csvde 导出OU列表2,使用perl处理OU列表3,人工地从OU列表里选择需要添加的项,并手工地填写别名(这个别名本来是想做个字典或者使用模块,将汉字转化成拼音,但Perl的拼音这个模块实在是难用,只好作罢。)4,使用Perl处理选择的项,生成新建动态通讯组的命令5,将命令运行到Exchange管理控制台下,即可bat代码:View Code echo offcsvde -f ad.txt -l DN -r 阅读全文
posted @ 2013-01-16 21:26 zhaofei_001 阅读(347) 评论(0) 推荐(0) 编辑
摘要: 脚本说明:在RedHat5.4,5.5版本测试通过,显示CPU,内存,硬盘,网络的基本信息;运行后的结果是(虚拟机):************************Detail******Hostname: oracle-t-gMachine_name: VMware, Inc.Version: Linux version 2.6.18-194.el5Linux_Version: Red Hat Enterprise Linux Server release 5.5 (Tikanga)Machine_kind: VMware Virtual PlatformSN: VMware-42 3.. 阅读全文
posted @ 2013-01-14 15:42 zhaofei_001 阅读(1484) 评论(0) 推荐(0) 编辑