Help for this page
my $rotext = $ec->Subwidget(ROText); $rotext->configure(-height => 0);
$text->bind('<Control-r>',sub{$ec->kill_command });