带有虚拟占位符的 Perl 赋值

Question

在我使用过的其他语言(如 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 是否有类似的模式可以用来代替创建无用的临时变量？

Answer 1

undef在 Perl 中起到同样的作用。

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