阅读内容 

Perl程序设计中常用的函数之三

[日期:2005-04-14] 来源:中国站长学院  作者:郁郁小蝎 [字体: ]
指令:exit

语法:exit

说明:
退出执行的程序。

示例:
print"i love CGI\n";
exit;

显示完"i love CGI"以后,将退出这个程序。

指令:keys

语法:keys(%array)

说明:
取出关联数组%ARRAY中全部的key。

示例:
%NAME=(1,"mike",2,"michael");
@readkey=keys(%NAMES);----------------- #这时@readkey=(1,2);

指令:values

语法:values(%array)

说明:
取出关联数组%ARRAY中全部的value。

示例:
%NAMES=(1,"mike",2,"michael");
@readval=values(%NAMES); ---------------- #这时@readval=("mike","michael");

指令:reverse

语法:reverse(@array)

说明:
将数组@array中的元素由后到前重新排列。

示例:
@back=("A","B","C","D","E");
@back=reverse(@back);--------------------- #这时@back=("E","D","C","B","A");

指令:sort

语法:sort(@array)

说明:
将数组中的元素由小到大排序,如果要由大到小排序的话,要加上reverse这个函数。

示例:
@abc=("d","b","c","a");
@abc=sort(@abc); -------------------------- #这时@abc=("a","b","c","d");
@abc=(reverse sort@abc); --------------- #这时@abc=("d","c","b","a");
这个语法也可以写成 @abc=(reverse sort(@abc));
@number=(5,2,10);
@number=sort(@number);
上面示例用sort函数来排序数值的时,会出差错,因此要用下面到下面这一句。 @number=(sort{$a<=>$b}@number); -----------#这时@number=(2,5,10);
阅读:
录入:

推荐 】 【 打印
相关新闻      
本文评论       全部评论
发表评论
  • 尊重网上道德,遵守中华人民共和国的各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • 本站管理人员有权保留或删除其管辖留言中的任意内容
  • 本站有权在网站内转载或引用您的评论
  • 参与本评论即表明您已经阅读并接受上述条款


点评: 字数
姓名:
Advertisement
内容查询


Advertisement