#!/usr/bin/env perl

use strict;
use warnings;

use Term::VT102;

my $term = Term::VT102->new(cols => 80, rows => 24);