sub add_button_click{$entryvariable = ""; $mybrowseentry->focus; $mybrowseentry->configure(-state => 'normal'); }