print $q->header( -type    => 'text/html',
                  -expires => '-1d',
                  -pragma  => 'no-cache',
                  -refresh =>  '100' ),
       $q->start_html( -title      => 'Some Company's Bond Ticker',
                       -bgcolor    => '#00092A',
                       -background => '../images/i-4-bg.gif',
                       -onLoad     => 'initSymbols()',
                       -script     => $script,
                       -style      => { -code => $css } );

##</code><code>##

Expires: Thu, 05 Oct 2000 23:10:04 GMT
Date: Fri, 06 Oct 2000 23:10:04 GMT
Pragma: no-cache
Refresh: 100
Content-Type: text/html