Help for this page

Select Code to Download


  1. or download this
    my (undef, $a, undef, $b, @rest, $c) = (1, 2, 3, 4, 5, 6, 7, 8);
    
  2. or download this
    my $count   = @rest; # 4 - because there are four items (scalar contex
    +t)
    
    my ($first) = @rest; # 5 - because first item is 5 (list context)
    
  3. or download this
    my $last = (11, 22, 33, 999); # 999 - because assigning LIST to scalar
    + only picks last item