$number=$values{"number"};
my $con_data=[];
for ($i=1 ;$i<=$number ; $i++){
  push @$con_data, [$values{"radius$i"}, $values{"length$i"}];
}