$mb = $mw->Frame(-relief => 'ridge', -bd => 5);

#Menue:
$m_file = $mb->Menubutton(-text      => "Datei",-underline => 1)->pack();