in reply to How Can My Perl/Tk Program use a Defined Font for All Widgets?
It's
$mw->optionAdd('*font' => 'sans 12'); [download]
on my linux system.