Thread Board-rewrite: allgemeine Ideen
(44 answers)
Opened by jan10001 at 2003-08-25 00:08
so nebenbei...
damit das ganze funzt, müsste man es natürlich so machen Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 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 |