...
my $mbut3 =$lab->Button(-text => " Synchronisieren ", -state=>$stat,
                                -command => sub{
                                         &doitnow;})
                                -> pack(-side=>'left', -ipady => '3p',-padx => '5p', -pady => '1p');
...