Help for this page
(undef, $foo, undef, undef, $bar) =(1..5); print "$foo $bar";
($foo, $bar) =(1..5)[1,4]; print "$foo $bar";