Perl 将映射函数保存在列表中

打印没有尾随的字符串列表的最佳方式是什么

我尝试了以下方法，部分成功：

@list = map { "${_}\n" } @list;
print @list;
@list = map { chomp } @list;

其中最后一行代码的目的是将列表恢复到其原始状态。 @list中的项目按照我的要求打印在不同的行中，但@list中只包含一个元素，其值为“1”

我做错了什么

谢谢你提供了一系列的价值观，只要做就行了

chomp(@list);

chomp

不返回修改后的值，而是返回根据修改后的值删除的字符总数

但是，与其修改原始数组以便在新行上打印每个数组，不如使用

for

循环

print "$_\n" for @list;

要创建一个值列表，只需执行以下操作

chomp(@list);

chomp

不返回修改后的值，而是返回根据修改后的值删除的字符总数

但是，与其修改原始数组以便在新行上打印每个数组，不如使用

for

循环

print "$_\n" for @list;

---

甚至

表示@list

@perlpilot TY用于尝试编辑字符数。甚至

表示@list@perlpilot TY，用于尝试编辑字符数。