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