box-o-sand/curses-practice/perl/01.pl

18 lines
226 B
Perl
Executable File

#!/usr/bin/perl
#
# Copyright (C) 2003 by Virtusa Corporation
# http://www.virtusa.com
#
# Anuradha Ratnaweera
# http://www.linux.lk/~anuradha/
#
use Curses;
initscr();
printw("Hello world!");
refresh();
getch();
endwin();