$artpara_fr = $artsuchmask_fr->Frame(-background => 'grey', -relief => 'flat', -borderwidth => 3)->pack(-side => 'top', -fill => 'both');