#!/usr/bin/perl -w
# 1999-06
# http://www.cyut.edu.tw/~ckhung/b/mi/
use Curses;

initscr;
clear;
sleep 3;
refresh;
sleep 3;
endwin;