SWITCH: for ($funct){
   /save news/i   && do { &savenews;  last; };					
   /save book/i   && do { &addbook;   last; }; 				
   /save observ/i && do { &addobserv; last; };	
   /save rule/i   && do { &addrule;   last; };
		
   /update book/i   && do { &updatebook;    last; }; 				
   /update observ/i && do { &updateobserv;  last; };	
   /update rule/i   && do { &updaterule;    last; };
		
   /edit news/i   && do { &editnews;   last; };
   /edit book/i   && do { &editbook;   last; };	
   /edit observ/i && do { &editobserv; last; };
   /edit rule/i   && do { &editrule;   last; };
		
   /add book/i    && do { &addbkform;  last; };	
   /add observ/i  && do { &addobform;  last; };
   /add rule/i    && do { &addruform;  last; };
		
   /list authors/i  && do { &listall;  last; };
   /list titles/i   && do { &listall;  last; };
		
   /view news/i   && do { &viewnews;    last; };					
   /view book/i   && do { &viewbooks;   last; }; 				
   /view observ/i && do { &viewobserv;  last; };	
   /view rule/i   && do { &viewrules;   last; };	
		
   /next/i        && do { &viewbooks;  last; }; 				
   /prev/i        && do { &viewbooks;  last; }; 				
	
   $funct = "";											
}
	
print "Content-type: text/html\n\n";
print $template->output;  #display html

#end