my $v3 = (@tarray)[0];

##</code><code>##

my $v3 = $tarray[0];

##</code><code>##

my ($v4, $v5) = @tarray[0, 2];