
perl
wangran51
这个作者很懒,什么都没留下…
展开
-
perl map
perl的map函数perl的map函数的使用: 语法map EXPR, LISTmap BLOCK LIST 定义和使用对list中的每个元素执行EXPR或BLOCK,返回新的list。对每一此迭代,$_中保存了当前迭代的元素的值。 返回值如果返回值存储在scalar标量中,则代表map()返回数转载 2011-11-14 14:20:38 · 1097 阅读 · 0 评论 -
pack &unpakc
函数名pack调用语法formatstr = pack(packformat, list);解说把一个列表或数组以在实际机器存贮格式或C等编程语言使用的格式转化(包装)到一个简单变量中。参数packformat包含一个或多个格式字符,列表中每个元素对应一个,各格式字符间可用空格或tab隔开,因为pack忽略空格。 除了格式a、A和@外,重复使用一种格式多转载 2011-11-14 14:19:22 · 525 阅读 · 0 评论 -
splite
Perl中的一个非常有用的函数是split - 把字符串进行分割并把分割后的结果放入数组中。这个函数使用规则表达式(RE),如果未特定则工作在$_变量上。split函数可以这样使用:$info = "Caine:Michael:Actor:14, Leafy Drive";@personal = split(/:/, $info);其结果是:@personal =转载 2011-11-14 14:19:58 · 1170 阅读 · 0 评论 -
perl地址转换
#!/usr/bin/perl -w#### 将十进制数转换成8为二进制sub dectobin { substr(unpack("B31",pack("N",shift)) , -8);}#### 将32位二进制转换成十进制sub bintodec { unpack("N", pack("B32", substr("0" x 32 . sh转载 2011-11-14 14:04:42 · 862 阅读 · 0 评论 -
perl地址转换
#!/usr/bin/perl -w #### 将十进制数转换成8为二进制 sub dectobin { substr(unpack("B31",pack("N",shift)) , -8); } #### 将32位二进制转换成十进制 sub bintodec { unpack("N", pack("B32", substr("0" x 32 . shift, -32))); } #### 将二进...2011-11-14 14:04:00 · 231 阅读 · 0 评论 -
splite
Perl中的一个非常有用的函数是split - 把字符串进行分割并把分割后的结果放入数组中。这个函数使用规则表达式(RE),如果未特定则工作在$_变量上。 split函数可以这样使用: $info = "Caine:Michael:Actor:14, Leafy Drive"; @personal = split(/:/, $info); 其结果是: @personal = ("Cai...2011-11-14 14:19:00 · 711 阅读 · 0 评论 -
pack &unpakc
函数名pack调用语法formatstr = pack(packformat, list);解说把一个列表或数组以在实际机器存贮格式或C等编程语言使用的格式转化(包装)到一个简单变量中。参数packformat包含一个或多个格式字符,列表中每个元素对应一个,各格式字符间可用空格或tab隔开,因为pack忽略空格。 除了格式a、A和@外,重复使用一种格式...2011-11-14 14:19:00 · 113 阅读 · 0 评论 -
perl map
perl的map函数 perl的map函数的使用: 语法map EXPR, LISTmap BLOCK LIST定义和使用对list中的每个元素执行EXPR或BLOCK,返回新的list。对每一此迭代,$_中保存了当前迭代的元素的值。 返回值如果返回值存储在scalar标量中,则代表map()返回数组的元素个数;如果返回值存储在list中,...2011-11-14 14:20:00 · 142 阅读 · 0 评论