use Data::Alias; my @x = (1, 2, undef) ; alias my ($a, $b, $c) = @x ; $c = $a + $b ; print "@x\n" ; [download]
In reply to Re: referencing list by tobyink in thread referencing list by pmilne