Perl赋值与虚拟占位符

在其他语言中，我使用像Erlang和Python，如果我分割一个字符串，而不关心其中一个字段，我可以使用一个下划线占位符。我在Perl中尝试过：

(_,$id) = split('=',$fields[1]);

但我得到以下错误：

Can’t modify constant item in list assignment at ./generate_datasets.pl line 17,near “);”
Execution of ./generate_datasets.pl aborted due to compilation errors.

Perl有类似的这样的模式，我可以使用而不是创建一个无用的临时变量？

解决方法

undef在Perl中具有相同的用途。

(undef,$something,$otherthing) = split(' ',$str);