Select Code to Download

## This is the button that initiates the sub ADMISSION

...
sub ADMISSION {
    $namefield->Text(-width=>30,-height=>1)->pack();
        }