Entry(
         -textvariable => $tv, 
       ) -> pack(-fill => 'x');