my $value = ( split ' ', $a1[ 0 ] )[ 2 ];