如何系统的学习Perl语言
展开全部 学习窍门:1、查询文档如果你对某个函数的使用不清楚,那么在命令行上使用 perldoc 函数名 来查阅 Perl 自带文档。
你也可以把 函数名 替换为模块名来查阅模块文档。
例如perldoc LWP::Simple 当然, 如果英文有困难的话,还是建议阅读 Oreilly 书籍。
2、程序调试不管你的程序多短,使用 use warnings 和 use strict 对你找到错误有非常大的帮助。
庆幸的是, klaus 已经翻译了一篇绝妙的调试文章 Brian 的 Perl 问题之万能指南3、提问的智慧和寻找答案的能力初学时碰到的许多问题 都已经被别人问过了而且很有可能已经被回答了。
所以,要学会使用 google 或论坛搜索你的答案。
遇到问题时,可以把问题表达出来,阅读相关文档,尝试写程序自己解决。
如果实在没有头绪的话,最后尝试到论坛里或者是用户组来提 问,通常,大家更乐意帮助那些已经对自己的问题作过研究的人,那些只要答案的人常常没人理睬。
学习语言是一个自己反复研究,尝试的过程,不要依靠别人的帮 助。
...
用perl打开一个word文件并修改部分表格和文本内容,
我也刚解决了这个问题 作为参考你可以试一下(我是选择了第一种方法)1)在安装时解决:解决方法:安装的时候一定自定义安装(这里是我的习惯,不然垃圾会装了很多),以2003的版本为例的话,自定义的下一步有个,高级。
。
前面的勾打上,以便下面自己设置。
再下一步是 选择要安装的组件,里面 有个Office共享工具,这个,关键所在。
。
不信展开看一下,里面有个,新建。
。
什么什么的。
。
默认是不安装的,这里我们选择从本地运行。
再安装就OK了2)安装后的解决:有些简版的OFFICE2003,右键的新建菜单中没有“新建WORD文档”。
在网上搜了好多的资料都是无效的,下面是一项编辑注册表的信息,把横线中的信息复制的记事本中,然后另存为 *.reg格式的文件。
----------------------------------- Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOT\.doc] @="Word.Document.8""Content Type"="application/msword" [HKEY_CLASSES_ROOT\.doc\OpenWithList] [HKEY_CLASSES_ROOT\.doc\OpenWithList\WordPad.exe] @="" [HKEY_CLASSES_ROOT\.doc\PersistentHandler] @="{98de59a0-d175-11cd-a7bd-00006b827d94}" [HKEY_CLASSES_ROOT\.doc\ShellNew] [HKEY_CLASSES_ROOT\.doc\Word.Document.6] [HKEY_CLASSES_ROOT\.doc\Word.Document.6\ShellNew]"FileName"="winword.doc" [HKEY_CLASSES_ROOT\.doc\Word.Document.8] [HKEY_CLASSES_ROOT\.doc\Word.Document.8\ShellNew]"FileName"="winword8.doc" [HKEY_CLASSES_ROOT\.doc\WordDocument] [HKEY_CLASSES_ROOT\.doc\WordDocument\ShellNew]"FileName"="winword2.doc" [HKEY_CLASSES_ROOT\.doc\WordPad.Document.1] [HKEY_CLASSES_ROOT\.doc\WordPad.Document.1\ShellNew]"NullFile"="" ----------------------------------- 以下是新建EXCEL文档的注册信息(.xls) ----------------------------------- Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOT\.xls]"Content Type"="application/vnd.ms-excel" @="Excel.Sheet.8" [HKEY_CLASSES_ROOT\.xls\Excel.Sheet.5] [HKEY_CLASSES_ROOT\.xls\Excel.Sheet.5\ShellNew]"FileName"="excel.xls" [HKEY_CLASSES_ROOT\.xls\Excel.Sheet.8] @="" [HKEY_CLASSES_ROOT\.xls\Excel.Sheet.8\ShellNew]"FileName"="excel9.xls" [HKEY_CLASSES_ROOT\.xls\ExcelWorksheet] [HKEY_CLASSES_ROOT\.xls\ExcelWorksheet\ShellNew]"FileName"="excel4.xls" [HKEY_CLASSES_ROOT\.xls\PersistentHandler] @="{98de59a0-d175-11cd-a7bd-00006b827d94}" ----------------------------------- 以下是powerpiont幻灯片文档的注册信息(.ppt) ----------------------------------- Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOT\.ppt]"Content Type"="application/vnd.ms-powerpoint" @="PowerPoint.Show.8" [HKEY_CLASSES_ROOT\.ppt\PersistentHandler] @="{98de59a0-d175-11cd-a7bd-00006b827d94}" [HKEY_CLASSES_ROOT\.ppt\PowerPoint.Show.4] [HKEY_CLASSES_ROOT\.ppt\PowerPoint.Show.4\ShellNew]"FileName"="powerpnt.ppt" [HKEY_CLASSES_ROOT\.ppt\PowerPoint.Show.8] [HKEY_CLASSES_ROOT\.ppt\PowerPoint.Show.8\ShellNew]"FileName"="pwrpnt11.pot" 双击该注册项。
会弹出“是否确认要将***.reg中的信息添加到注册表” 点击“是”。
刷新一下就可以看到右键菜单中的新建项的word文档了。
perl语言:两个文件的关联操作
这个帖子看见几天了,都没人回,可能是被【详尽解释】吓住了,因为解释的详尽程度与听者的基础有关,而且打字太费力了。
如果你的目的是学习PERL,那么使用HASH(%)数据类型(也叫做关联数组)很容易解决,扫描两个文件生成两个关联数组,然后就可以生成结果了。
如果你只是为了解决实际问题,其实用EXCEL非常方便,两个文件粘贴到表里面,分列之后使用VLOOKUP就获得结果。
用perl语言,把一个文件中的部分内容由另一个文件替换
Perl 最初的设计者为拉里·沃尔(Larry Wall),他于1987年12月18日发表。
Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。
其中最重要的特性是它内部集成了正则表达式的功能,以及巨大的第三方代码库CPAN。
Perl 被称为“实用报表提取语言”(Practical Extraction and Report Language)。
它是溯语,而不仅仅是简写,Perl的创造者,Larry Wall提出第一个,但很快又扩展到第二个。
那就是为什么“Perl”没有所有字母都大写。
没必要争论哪一个正确,Larry 两个都认可。
http://baike.baidu.com/view/46614.html?wtp=tt
老师, 请教下,用perl 语言,把一个文件里面的一部分内容写到另一个...
根据我的理解,做了一个脚本,在我的机器上试过了:use 5.016;use warnings;use utf8;use autodie;my %target;my $source_file = 'original.txt';my $target_file = 'target.txt';my $source_file_fh; # your source file handlemy $target_file_fh; # your target file handlemy $key; # key item in target filemy $content; # last content item in target filesub get_last_item {my $str = shift;$str =~ /.*[ ]+(.*)/;return $1;}sub get_key {my $str = shift;my $content = shift;$str =~ /.*[ ]+(.*)[ ]+$content/;return $1;}open($source_file_fh, "open($target_file_fh , ">", $target_file);while () {$content = get_last_item($_);$key = get_key($_, $content);$target{$key} = $content if ($key);}for (sort keys %target) {say $target_file_fh "$_ $target{$_}";}close $target_file_fh;close $source_file_fh;
转载请注明出处51数据库 » perl语言新建word
锐63094547