Re^3: Avoiding repeated undefs

Similar approach:

( my $key, (undef) x 5, my $val) = split(/\s+/, $_);
[download]

Note: 'undef' must be enclosed with parentheses to force list context for 'x' operator.

Comment on Re^3: Avoiding repeated undefs Download Code

Replies are listed 'Best First'.
Re^4: Avoiding repeated undefs by choroba (Cardinal) on Feb 28, 2019 at 06:37 UTC
Note that you need 5.22 for this to work. See Assignment to list repetition in Perl 5.22 delta. See also `()x=` in Syntax::Construct. `map{substr$_->[0],$_->[1]\|\|0,1}[\\|\|{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^ARGV,3]`	[reply] [d/l] [select]