QuaD-Pres - A Perl-based Tool for PresentationUsageThe Contents.pm File

4.2. The Contents.pm File


package


 Contents;



use strict
;


my

$contents =
{

'
title
' =>
"
QuaD-Pres - A Perl-based Tool for Presentation
",

'
subs
' =>
    [
        {

'
url
' =>
"
intro.html
",

'
title
' =>
"
Introduction
",
        },
        {

'
url
' =>
"
history.html
",

'
title
' =>
"
The History of QuaD-Pres
",
        },
        {

'
url
' =>
"
features.html
",

'
title
' =>
"
Quad-Pres Features
",
        },
        {

'
url
' =>
"
usage
",

'
title
' =>
"
Usage
",

'
subs
' =>
            [
                {

'
url
' =>
"
setting-up.html
",

'
title
' =>
"
Setting Up
",
                },
                {

'
url
' =>
"
Contents.pm.html
",

'
title
' =>
"
The Contents.pm File
",
                },
                {

'
url
' =>
"
page.html
",

'
title
' =>
"
An Individual Page
",
                },
                {

'
url
' =>
"
images.html
",

'
title
' =>
"
Including Images
",
                },
            ],

'
images
' => [
'
logo-wml.png
' ],
        },
        {

'
url
' =>
"
no_wml
",

'
title
' =>
"
Using QuaD-Pres without Website Meta Language
",

'
subs
' =>
            [
                {

'
url
' =>
"
page.html
",

'
title
' =>
"
An Individual Page
",
                },
                {

'
url
' =>
"
render-modes.html
",

'
title
' =>
"
The Render Modes
",
                },
            ],
        },
        {

'
url
' =>
"
finale
",

'
title
' =>
"
Finale
",

'
subs
' =>
            [
                {

'
url
' =>
"
samples.html
",

'
title
' =>
"
Sample Presentations
",
                },
                {

'
url
' =>
"
links.html
",

'
title
' =>
"
Links
",
                },
            ],
        }
    ],

'
images
' =>
    [

'
style.css
',
    ],
};


sub

 
get_contents
{


return

$contents;
}

Written by Shlomi Fish