摘要: 在Perl中,字符串比较和数字比较是由不同的运算符来完成的:数字比较运算符: , =, ==, !=字符串比较运算符: lt, gt, le, ge, eq, necmp: 比较字符串,返回 -1, 0 或者 1。: 比较数字,返回 -1, 0 或者 1。=~:用正则表达式来匹配,匹配的话返回True。!~:和 =~ 相反,不匹配返回True。例子#!/usr/bin/envperlusestrict;usewarnings;my$num1=1;my$num2=1.0;my$two_numbers="$num1and$num2";my$str1="1abc&quo 阅读全文
posted @ 2013-11-19 12:35 虾米的虾皮 阅读(728) 评论(0) 推荐(0) 编辑
摘要: Perl流程控制语句条件选择语句1if(条件表达式){语句块1;}else{语句块2;}条件选择语句2unless(判别运算式){语句2;}else{语句1;}if条件语句嵌套if(条件表达式1){语句1}elsif(条件表达式2){语句2}elsif(条件表达式3){语句3}else{语句4}例:#!/usr/bin/Perl-w print "input?\n"; $name=; chop ($name); if($name eq "bo") { print"my name is $name\n"; }elsif($name eq 阅读全文
posted @ 2013-11-19 11:39 虾米的虾皮 阅读(638) 评论(0) 推荐(0) 编辑
摘要: 举个例子:file1是这样的:11111111111111222222222222225555555555555566666666666666file2是这样的:33333333333333444444444444447777777777777788888888888888而我想得到的结果file3是:1111111111111122222222222222333333333333334444444444444455555555555555666666666666667777777777777788888888888888程序举例:openIN1,'',$file_out;my 阅读全文
posted @ 2013-11-19 11:12 虾米的虾皮 阅读(334) 评论(0) 推荐(0) 编辑
摘要: cut是一个选取命令,就是将一段数据经过分析,取出我们想要的。一般来说,选取信息通常是针对“行”来进行分析的,并不是整篇信息分析的。(1)其语法格式为:cut [-bn] [file] 或 cut [-c] [file] 或 cut [-df] [file]使用说明cut 命令从文件的每一行剪切字节、字符和字段并将这些字节、字符和字段写至标准输出。如果不指定 File 参数,cut 命令将读取标准输入。必须指定 -b、-c 或 -f 标志之一。主要参数-b :以字节为单位进行分割。这些字节位置将忽略多字节字符边界,除非也指定了 -n 标志。-c :以字符为单位进行分割。-d :自定义分隔符,默 阅读全文
posted @ 2013-11-18 14:25 虾米的虾皮 阅读(211) 评论(0) 推荐(0) 编辑
摘要: 关于学习PerlPerl是一门很有用的语言,可以用它来做很多事。然而,它也仅是一门语言,掌握了Perl,你只是掌握了Computer领域的一小块知识。在学习Perl前,请明确你的学习目的,并采用正确的学习方法和资源。(一)学习目的你学Perl的目的是什么?要实现你的目的,光有Perl够吗?让偶帮你分析看看。1. 我想当一名System Administrator,并将Perl用于SA工作。想法很好,优秀的SA,Perl能力必备。Perl自身的灵活语法,强大的正则表达式,良好的shell结合能力,以及CPAN的众多模块,会使你的SA 工作如鱼得水,工作量倍减。然而,SA工作的本质还在于Syste 阅读全文
posted @ 2013-11-08 16:21 虾米的虾皮 阅读(251) 评论(0) 推荐(0) 编辑
摘要: Practical Extraction and Report LanguagePerl 最初的设计者为拉里·沃尔(Larry Wall),它于1987年12月18日发表。Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。Perl 一般被称为“实用报表提取语言”(Practical Extraction and Report Language),虽然有时被称做“病态折中垃圾列表器”(PathologicallyEclectic Rubbish Lister)。它是术语,而不仅仅是简写,Perl的创造者,LarryWall提出第一个,但很快又扩 阅读全文
posted @ 2013-11-08 16:11 虾米的虾皮 阅读(778) 评论(1) 推荐(1) 编辑
摘要: Push-Profile-Request (PPR) Command The Push-Profile-Request (PPR) command is indicated by the Command-Code set to 288 and the Command Flags' 'R' bit set. The Diameter server sends this command to the Diameter client in a SIP server to update either the user profile of an already register 阅读全文
posted @ 2013-11-08 00:34 虾米的虾皮 阅读(772) 评论(0) 推荐(0) 编辑
摘要: 个人常用正则表达式:去除前导空格s/^\s+//去除尾部空格s/\s+$//去除前后空格s/^\s+|\s+$//g匹配任意字符/.*/s这里/s表示连换行符也匹配,因为.是不匹配换行符的,所以上面的表达式匹配任意字符。下面看第二种方法,perl中的元字符.能匹配所有单个字符,但是不能匹配换行符,如果要匹配的文本含有换行符,那么.将无法胜任,比如下面的xml文件。Response> Code>200Code> Description>SuccessDescription>Response>如果想取得Response结点中的内容,那么下面的表达式无法完成工作, 阅读全文
posted @ 2013-11-07 13:28 虾米的虾皮 阅读(697) 评论(0) 推荐(0) 编辑
摘要: Registration-Termination-Request (RTR) Command The Registration-Termination-Request (RTR) command is indicated by the Command-Code set to 287 and the Command Flags' 'R' bit set. The Diameter server sends this command to the Diameter client in a SIP server to indicate to the SIP server th 阅读全文
posted @ 2013-11-07 09:27 虾米的虾皮 阅读(1096) 评论(0) 推荐(0) 编辑
摘要: Delete Subscriber DataGeneral description:This procedure shall be used between the MME and the HSS and between the SGSN and the HSS, to remove some or all data of the HSS user profile stored in the MME or SGSN. The procedure shall be invoked by the HSS and it corresponds to the functional level oper 阅读全文
posted @ 2013-11-05 22:51 虾米的虾皮 阅读(1465) 评论(0) 推荐(0) 编辑