my (undef, $a, undef, $b, @rest, $c) = (1, 2, 3, 4, 5, 6, 7, 8);

##</code><code>##

my $count   = @rest; # 4 - because there are four items (scalar context)

my ($first) = @rest; # 5 - because first item is 5 (list context)

##</code><code>##

my $last = (11, 22, 33, 999); # 999 - because assigning LIST to scalar only picks last item