$prompt=$main->DialogBox(-title=>"Say it", -buttons=>["OK","Cancel"]);
my $getNewAfrm=$prompt->add(Text, -height=>'5', -width=>'30');
$prompt->add($getNewAfrm);