my @array = ("This", "That", "and", "The", "Other");
my %hash = ( "This" => "That",
             "The"  => "Other" );
my $var = ("This", "That"); # $var now contains "That".
my ( $this, $that ) = \( $the, $other ); # The reference
                  # constructer is distributive and
                  # applies to both items inside the rvalue
                  # list.