use strict;
use warnings;
use Curses::UI;

my $cui = new Curses::UI;

$cui->status("Saying hello to the world...");
sleep(1);
    # code for saying "Hello, world!"

$cui->status("Saying goodbye to the world...");
    # code for saying "Goodbye, world!"
sleep(1);

$cui->nostatus;