CGI-Portable

 view release on metacpan or  search on metacpan

demos/website/content/content_prefs.pl  view on Meta::CPAN

my $rh_preferences = { 
	add_page_style_code => [
		'body {background-color: white; background-image: none}', 
		'h1, h2 {text-align: center}', 
		'td {text-align: left; vertical-align: top}',
	],
	delegate_list => [
		{
			module_name => 'CGI::Portable::AppStatic',
			preferences => 'menu_prefs.pl',
			leave_scalars => 1,
		},
		{
			module_name => 'CGI::Portable::AppMultiScreen',
			preferences => {
				prepend_page_body => "\n<hr />\n",
				delegate_list => {
					external => {
						module_name => 'DemoRedirect',
						preferences => { low_http_window_target => 'external_link_window' },
					},
					frontdoor => {
						module_name => 'DemoTextFile',
						preferences => { filename => 'frontdoor.html' },
					},
					resume => {
						module_name => 'DemoTextFile',
						preferences => { filename => 'resume.html' },
					},
					mysites => {
						module_name => 'DemoTextFile',
						preferences => { filename => 'mysites.html' },
					},
					mailme => {
						module_name => 'DemoMailForm',
						preferences => {},
					},
					guestbook => {
						module_name => 'DemoGuestBook',
						preferences => {
							custom_fd => 1,
							field_defn => 'guestbook_questions.txt',
							fd_in_seqf => 1,
							fn_messages => 'guestbook_messages.txt',
						},
					},
					links => {
						module_name => 'DemoTextFile',
						preferences => { filename => 'links.html' },
					},
				},
				default_delegate => 'frontdoor',
				append_page_body => "\n<hr />\n",
			},
		},
		{
			module_name => 'CGI::Portable::AppStatic',
			preferences => 'menu_prefs.pl',
			leave_scalars => 1,
		},
	],
	append_page_body => <<__endquote,
<p><em>This site is a simple example of what can be done with CGI::Portable and 
the Dynamic Website Generator collection of Perl 5 modules, copyright (c) 
1999-2001, Darren R. Duncan.</em></p>
__endquote
	page_search_and_replace => {
		__mailme_url__ => "__url_path__=/mailme",
		__external_id__ => "__url_path__=/external&url",
	},
};



( run in 1.066 second using v1.01-cache-2.11-cpan-0bb4e1dffa6 )