(my $first) = f(); (my $first, undef, my $third) = f(); (undef, my $second) = f();