package BoardConf; use strict; use warnings; use vars qw(%Actions); # Program logic is defined here %Actions = ( start => { subs => [ \&BasicFunctions::WriteStandardHtmlHeader, \&BasicFunctions::WriteLogonPage, \&BasicFunctions::WriteStandardHtmlFooter, ], }, # start logonUser => { subs => [ \&BasicFunctions::WriteStandardHtmlHeader, \&BasicFunctions::ValidateUser, \&BasicFunctions::WriteStandardHtmlFooter, ], }, # logonUser # ... ); # %Actions # ------------------------------------------------------------ 1; # modules have to return a true value