my $v3 = $tarray[0];