while (my $modelselect ne '10')