sub createAccount { 

    my(    $Username_arr,
        $Name_arr,
        $Password_arr,
        $PassCheck_arr,
        $Email_arr,
        $Sylabus_arr,
        $Instrument_arr,
        $Theory_arr, 
        $Practical_arr
    ) = @_; 
     
    my $username         = $Username_arr->get; 
    my $name        = $Name_arr->get(); 
    my $password         = $Password_arr->get(); 
    my $passconfirm     = $PassCheck_arr->get(); 
    my $email         = $Email_arr->get(); 
    my $syll        = $Sylabus_arr->get(); 
    my $inst        = $Instrument_arr->get(); 
    my $theory_g         = $Theory_arr->get(); 
    my $practical_g        = $Practical_arr->get(); 
     
    my $test = new MainWindow; 
    $test->title( $Username_arr );
    $test->geometry("335x160"); 
     
     

}
return true;