my $v = int(($uma_data[$uma_a][2]-$uma_data[$uma_a][2]/$uma_cnt)/2);
my $v = int(($uma_data[$uma_a][2])/2);