$f->Checkbutton( -text=>$qqq, -offvalue=>'', -onvalue=>$qqq, # -variable=>\$qqq, -command=>\&hostls, )->pack(-side=>'left');