Help for this page
use Tk::Pretty; @config = $entryvar->configure; print Pretty @config;
$entryvar=$main->Entry(-text => "var")->grid(-column => 10, -row => 5) +; $entryvar->configure(-width => 30, -height => 20);