$mw->Label(-text => "test monospaced font", -font => 'mono');
$mw->Label(-text => "test monospaced font bis", -font => $mono_font);