随笔分类 -  Perl

摘要：1、如果是按ASCII码(字符串)排序，则代码如下：1 foreach my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) {2 my $value = $hash{$key};3 # do something with ($key, $value)4 }2、如果是按数字大小排列，则代码如下：1 foreach my $key ( sort { $hash{$a} <=> $hash{$b} } keys %hash ) {2 my $value = $hash{$key};3 # do something with ($ 阅读全文

摘要：本文和大家重点讨论一下Perl字符串处理函数的用法，每种函数都有各自的特点和作用，下面请看本文详细介绍，相信通过本文的学习你对Perl字符串处理函数一定会有所了解。Perl字符串处理函数index调用语法: position=index(string,substring,position);解说: 返回子串substring在字符串string中的位置，如果不存在则返回-1。 参数position是可选项，表示匹配之前跳过的字符数，或者说从该位置开始匹配。Perl字符串处理函数rindex调用语法: position=rindex(string,substring,position... 阅读全文

摘要：本文和大家重点讨论一下Perl Hash的用法，哈希是一种数据结构，和数组类似，但是，和数组不同的是，其索引不是数字，而是名字。也就是说，索引(这里，我们将它叫key)不是数字而是任意的唯一的字符串。一、什么是Perl Hash哈希是一种数据结构，和数组类似，可以将值存放到其中，或者从中取回值。但是，和数组不同的是，其索引不是数字，而是名字。也就是说，索引(这里，我们将它叫key)不是数字而是任意的唯一的字符串。key可以是任意的字符串，你可以使用任何的字符串作为key，但它们是唯一的。另一种思考hash 的方法是，把它看作一堆数据(a barrel of data)，每一个数据都有一个相应的 阅读全文

摘要：《SED 单行脚本快速参考》的 perl 实现需要处理文本时，通常我会使用sed或者awk，但我从来没有掌握它们，每次用时都得临时去查怎么使用。最近又碰到一个问题，想把一个html里面所有的css及javascript链接取出来，用sed或awk折腾了半天没有整出来，最后终于放弃了。我决定转向perl，perl是门非常强大的通用语言，但它最初诞生是用于文本处理，因此它处理文本的能力非常强大，并且于它一系列古怪的缩写，使得写命令非常简洁，非常适合一次性的文本处理。perl的与正则表达式的是我非常熟悉，几乎所有的现代编程语言都使用的是perl的正则表达式语法，不像vim,sed,grep等的正则表 阅读全文

摘要：# perl -MCPAN -e 'install Time::HiRes'# perl -MCPAN -e 'install File::Tail'# perl -MCPAN -e 'install Date::Parse'# perl -MCPAN -e 'install Net::Netmask' 阅读全文

摘要：C程序： 1 #ifdef HAVE_CONFIG_H 2 #include <config.h> 3 #endif 4 5 #include <stdio.h> 6 #include <stdlib.h> 7 #include <sys/time.h> 8 int main(int argc, char *argv[]) 9 {10 printf("Hello, world!\n");11 struct timeval tvafter,tvpre;12 struct timezone tz;13 int sum = 0; 1 阅读全文