---{/tmp/curses_ui_test}---
...
$text_editor->focus;
$cui->mainloop;

print STDOUT "outside of mainloop!\n";
---{/tmp/curses_ui_test}---