my $term = Term::ReadLine->new('My Application', \*STDIN, \*STDOUT);