my $modelselect;
while ( $modelselect ne '10')