PDL中是否存在无需pdl(map{} unpdl)的map()等效方法？

你当前用unpdl转成Perl数组再map最后重新构建PDL的写法存在明显性能缺陷：会把PDL底层存储的紧凑C数组完全拆成Perl标量列表，处理完再重新打包为PDL对象，大数组场景下内存开销会陡增几十倍，运行速度也会下降几个数量级，完全丢失了PDL的高性能优势。

PDL本身没有专门为Perl级逐元素回调设计的遍历方法——这是刻意的设计选择，PDL的核心优势就是向量化运算，所有操作默认在C层面逐元素批量执行，不需要手动写Perl层循环。对应需求可以按以下优先级选择实现方式：

• 最优方案：将myfunc改造为支持PDL入参的向量化函数
  只要函数逻辑用PDL内置的运算、方法实现，直接传入整个PDL对象就会自动作用于所有元素，不需要任何遍历操作，性能是Perl层循环的数百到数万倍。如果需要原地修改，用.=运算符直接把结果写回原PDL即可：

  sub myfunc {
      my $x = shift;
      # 所有PDL运算默认逐元素生效，逻辑可按需调整
      return $x * 2 + log($x) + 3;
  }
  
  my $pdl = pdl [1,2,3];
  $pdl .= myfunc($pdl); # 原地修改，无额外内存拷贝
  

• 备选方案：如果myfunc逻辑无法改造为PDL向量化形式，必须用Perl自定义逻辑逐元素处理，使用PDL核心内置的apply方法，配合inplace标记即可原地处理，不需要把整个PDL转出为Perl数组：

  use PDL;
  my $pdl = pdl [1,2,3];
  # 原地逐元素调用myfunc
  $pdl->inplace->apply(sub {
      my $val_ref = shift;
      $$val_ref = myfunc($$val_ref);
  });
  

  这个写法只会在处理单个元素时生成临时Perl标量，不会一次性把所有元素都转成Perl数组，内存和性能表现远好于unpdl+map的实现。

提示：如果不是必须原地修改，直接向量化调用函数返回新PDL的写法性能最好，inplace标记只在需要严格控制内存开销的场景下使用。

内容的提问来源于stack exchange，提问作者KJ7LNW