11 2011 档案

Perl最佳实践第五章(变量)
摘要:place holder 阅读全文

posted @ 2011-11-29 09:19 perlman 阅读(317) 评论(0) 推荐(0) 编辑

List::Util
摘要:use List::Util;use List::Util qw(first max maxstr min minstr reduce shuffle sum);sub test { my @numbers = (1, 2, 3, 4, 5, 6, 7); # Get first element my $first_number = first { defined($_) } @numbers; print $first_number, "\n"; # Get max element my $max_number = max @numbers; pri... 阅读全文

posted @ 2011-11-28 16:52 perlman 阅读(1038) 评论(0) 推荐(0) 编辑

perl中的map和grep
摘要:map语法:map EXPR, LISTmap BLOCK, LIST语义:对于LIST中的每个元素执行EXPR或者BLOCK,如果返回值存储在list中,则表示处理后的list,若返回值存储在scalar中,则表示处理后的list中元素个数。下面是几个例子.单词首字母大写sub test { my @names = ( 'jacob', 'alexander', 'ethan', 'andrew', ); my @new_names = map(ucfirst, @names); foreach my $name... 阅读全文

posted @ 2011-11-28 16:05 perlman 阅读(3801) 评论(0) 推荐(1) 编辑

Perl最佳实践第三章(命名规则)
摘要:标示符变量名采用 形容词_名词 的格式命名,多个单词之间用下划线分隔,比如$next_record$total_score$root_node对于查表的数组或者哈希,采用 xxx_of, xxx_for的命名方式,也就是在末端加上介词,比如。my %title_of;my %ISBN_for;my @sales_from;这种写法会使后面的代码可读性极好。while (my $month = prompt -menu => $MONTH_NAMES) { for my $book (@catalog) { print "$ISBN_for{$book} $title_of{.. 阅读全文

posted @ 2011-11-28 11:28 perlman 阅读(1620) 评论(0) 推荐(0) 编辑

Perl最佳实践读书笔记-第二章(代码部署)
摘要:代码风格最重要的是一致性!找出一种你或你的团队喜欢的风格,并坚持下去!括号方式使用K&R风格的括号,即把开口大括弧放在控制该代码块的行尾,接下来的代码缩进,然后在独立的一行放置闭口大括号。如下for my $name (@names) { for my $word ( anagrams_of(lc $name) ) { print "$word\n" ; }}列表元素占据多行时,按如下方式安排my @names = ( 'Damian', # 主键 'Matthew', # 明义 'Conway', # 一般类或类别) 阅读全文

posted @ 2011-11-27 10:29 perlman 阅读(781) 评论(0) 推荐(0) 编辑

Perl最佳实践读书笔记-第一章
摘要:本篇展开的小项有待完善,需待读书深入时回头总结。编码风格的三个主要目标:强健性,效率性,可维护性。强健性让初次犯错的机会减至最少比如用_ref后缀来命名引用,就可以避免将$array_ref->[$n]写成$array_ref[$n]。检查不正确的边界情况避开无法适当伸缩的构件如何处理是失败如何应对失败改善程序代码的结构效率性一个关键点是利用perl的优势并且避开perl的劣势,这就需要对perl非常熟悉才行,加油!比如一次性读入一个几十GB的大文件,仅仅是为了将其中的A替换为B,这么做就不如逐行读入并处理来的高效。可维护性通常来说,维护代码的时间至少是编写代码时间的4倍,所以为了你的代 阅读全文

posted @ 2011-11-27 10:07 perlman 阅读(569) 评论(0) 推荐(0) 编辑

使用mailx发送邮件
摘要:mailx是UNIX系统上用来处理邮件的工具,使用它可以发送,读取邮件。下面看看如何使用它来发送邮件。发送格式mailx -s subject user@xxx.com < message_file假设邮件内容存储于msg文件中,那么可以用如下方法:mailx -s "test mail" zdd@163.com < msg或者cat msg | mailx -s "test mail" zdd@163.com多个收件人之间用逗号分隔cat msg | mailx -s "test mail" zdd@163.com,zd 阅读全文

posted @ 2011-11-23 16:46 perlman 阅读(26994) 评论(0) 推荐(1) 编辑

JavaScript总结
摘要:1 使用MyEclipse开发2 静态页面直接preview即可,动态页面需要发布后才能看。3 发布前先启动tomcat4 启动完tomcat然后deploy5 再浏览器中输入 http://localhost:8080/h1/1.jsp 可以查看页面6 div7 head 和 body8 jquery中的选择器 阅读全文

posted @ 2011-11-23 10:21 perlman 阅读(145) 评论(0) 推荐(0) 编辑

如何在html中使用Javascript
摘要:将Javascript嵌入到HTML中HTML中的<script>标签用于把javascript插入到HTML页面中,如下,将下面内容保存为test.html,双击运行即可看到Hello, World!<html> <body> <script type="text/javascript"> document.write("Hello, World!") ; </script> </body></html>在哪里放置javascript放在<body>< 阅读全文

posted @ 2011-11-19 10:57 perlman 阅读(410) 评论(0) 推荐(0) 编辑

perl实现二叉树
摘要:最开始写的代码,每个结点用一个匿名哈希来表示,可惜运行时错误。。。代码如下use strict ;use warnings ;sub create_tree { my $n8 = { 'left' => undef , 'right' => undef , 'value' => 8 , } ; my $n6 = { 'left' => undef , 'right' => \$n8 , 'value' => 6 , }; my $n5 = { 'left& 阅读全文

posted @ 2011-11-14 18:03 perlman 阅读(1175) 评论(0) 推荐(0) 编辑

perl获取脚本名字
摘要:且看一段代码( my $pgm = $0 ) =~ s!.*/(.*)!$1! ;如果我们运行脚本的命令是perl d:/code/test.pl -f c:/test那么$0获取的是脚本本身,也即d:/code/test.pl正则表达式s!.*/(.*)!$1!是将脚本全名中的路径去掉,得到test.pl所以这行代码执行过后,$pgm的值就是test.pl,perl果然是强大呀! 阅读全文

posted @ 2011-11-10 10:56 perlman 阅读(2566) 评论(0) 推荐(0) 编辑

导航

< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5
点击右上角即可分享
微信分享提示