package MyApp::Config; use warnings; use strict; use Readonly; use vars qw( %Fonts ); Readonly::Hash %Fonts => ( default => 'Arial 12 normal', bold => 'Arial 12 bold', );