$f_refresh->Button(-text => 'Test', -command => sub { &displayMsg()})->pack(-side=>'left');

##</code><code>##

$update_bttn = $button_f->Button(-text => "Update",
				 -state => 'disabled',
				 -command => sub { &end_automode;
						   &ping_site });

##</code><code>##

$automode_bttn = $button_f->Button(-text => "Start Automode",
				   -command => \&do_automode);