|
|
|
|
 perl 代码 请教 - jing04 [ 2004-08-31 13:16 | 294 byte(s)]
 Re: perl 代码 请教 - ryanfishtail [ 2004-09-28 15:06 | 695 byte(s)]
|
|
|
|
[Original]
[Print]
[Top]
|
下面两行代码是在perl中, 在源程序中,我发现有许多qq| 或 map , 我不知何意.
<th align=left>|.$locale->text('Notes').qq|</th>;
........
map { print "$column_data{$_}
" } @column_index;
|
|
|
----
thanks
|
|
[Original]
[Print]
[Top]
|
|
[Original]
[Print]
[Top]
|
我只能回答map的问题:
map可以用来对一个列表(@val类型)变量的内容进行处理的函数,对列表中的每个元素进行处理,然后再把处理后的结果以列表的形式返回。列表中的每个元素默认的放入$_中
格式:map BLOCK, LIST
map EXPRESSION, LIST
例如:
FILE1文件中的内容如下:
abc def g
hijk lmn
opq rst
程序段:
open FILE1 '...';
@lines=<FILE1>; #此时@lines中有3个元素,分别为每一行的内容
@words = map {split ' ', substr($_, 0, -1)} @lines; #substr的目的是去掉元素最后的换行符
结果@words中为('abc', 'def', 'g', 'hijk', 'lmn', 'opq', 'rst')
|
|
|
[Original]
[Print]
[Top]
|
|
« Previous thread
多个参数怎么传给子函数 |
Perl 编 程
第4页 |
Next thread »
这行perl5代码什么意思 |
|