use Curses;
initscr;
$win = new Curses;
$win->addstr(20, 20, 'Hello');
$win->refresh;
while (1) {};
endwin;

##</code><code>##

Window newWin( Int lines, Int cols, Int beginy, Int beginx )
...
lines Number of lines in window
cols Number of columns in window
beginy Position of top of window
beginx Position of left of window

##</code><code>##

use Curses;
initscr;
$win = new Curses;
$win = newwin(40,40,1,1);
$win->addstr(20, 20, 'Hello');
$win->refresh;
while (1) {};
endwin;