简简单单讲map（仙子译创）

machine

好像有很多人喜欢用map，说老实话，我还是喜欢for循环套for循环。（:wink: c语言惯性思维）
总觉得用map的话，写的时候简洁，事后看起来费劲。 呵呵。

DQP

原帖由 machine 于 2008-12-17 14:47 发表
好像有很多人喜欢用map，说老实话，我还是喜欢for循环套for循环。（:wink: c语言惯性思维）
总觉得用map的话，写的时候简洁，事后看起来费劲。 呵呵。

其实感觉还好。 虽然map和grep可以用for代替， 但感觉语义并不完全相同。
感觉就像直接对集合进行操作和用sql一样 很舒服 感觉比for要直接 （:wink: sql惯性思维）

[ 本帖最后由 DQP 于 2008-12-17 14:57 编辑 ]

wfnh

强！！支持！

mwm5

赞~~

mwm5

8. 转置矩阵

@matrix = ( [1, 2, 3], [4, 5, 6], [7, 8, 9] );
foreach $xyz (@matrix) {
    print "$xyz->;[0]  $xyz->;[1]  $xyz->;[2]\n";
}
@transposed =
    map { $x = $_;
          [ map { $matrix[$_][$x] } 0 .. $#matrix ];
        } 0 .. $#{$matrix[0]};
print "\n";
foreach $xyz (@transposed) {
    print "$xyz->;[0]  $xyz->;[1]  $xyz->;[2]\n";

这段，多了几个分号，应该是粘贴的时候出错了~

8. 转置矩阵

@matrix = ( [1, 2, 3], [4, 5, 6], [7, 8, 9] );
foreach $xyz (@matrix) {
    print "$xyz->[0]  $xyz->[1]  $xyz->[2]\n";
}

@transposed =
    map { $x = $_;
          [ map { $matrix[$_][$x] } 0 .. $#matrix ];
        } 0 .. $#{$matrix[0]};

print "\n";
foreach $xyz (@transposed) {
    print "$xyz->[0]  $xyz->[1]  $xyz->[2]\n";
}

wendaozhe

学习ing

dahe_1984

仙子你成仙了

haofish

捧场。。准备学习一下下。。实在不想每次都要编译一个程序出来做测试案例和统计结果。。

xrzs1986

回复 1# 兰花仙子
偶在Cornell读书时...
看来真留过洋的呀。。。强人。。。顶起~

zj840221

拜读仙子大作泪流满面倍感荣幸。