#!/usr/bin/perl
# test.pl -- 
use Modern::Perl '2020';
use utf8;
no if $] >= 5.018, warnings => "experimental";
use open ':std', ':encoding(UTF-8)';
use autodie;
use Curses;

initscr;
endwin;