if(!defined $Max_Questions){ $Max_Questions = $Total_Questions; &_set_Max_Questions($self,$Max_Questions); }elsif($Max_Questions > $Total_Questions){ croak"Number of questions in $FileName exceeded"; }elsif($Max_Questions < 1){ croak"Must have at least one question in the test."; }else{ &_set_Max_Questions($self,$Max_Questions); }