Select Code to Download

# set a default font for all widgets
$mw->optionAdd('*font', 'Arial 24');

#!/usr/bin/perl
use warnings;
...
           );

MainLoop;