Question

我有这个简单的代码：

 perl -e '@A=([1,2],[3,4]); @B=map {$_[0]} @A; print @B'

我的目标是进行转型：

([1,2],[3,4]) -> (1,3)

代码没有输出。我在这里做错了什么？

Answer 1

您必须取消引用引用：

perl -e '@A = ([1, 2], [3, 4]); @B = map { $_->[0] } @A; print @B'
                                             ^^

检查