I am trying to get some basic knowledge and experience with programming
mod_perl. I have created an HTML form that calls a perl script, get the
info, query a mySQL database and display the results. So far so good. I
am now trying to 'jazz-up' my results document with a CSS. I don't get
any errors but it just doesn't seem to work. Here is part of my perl
script that gets the user data and accesses the DB and generates the
document.

use CGI;
use DBI;

my $query=new CGI;
...
# output a document
print $query->header();
print $query->start_html(-title=>"Howdy",
                         -style=>{-src=>'./dynamic.css'});
print $query->h1('Form Data');


Here is the contents of the file dynamic.css, which I located in the
cgi-bin directory, which is where the perl script is also located.

h1 {
    color: green;
}

Not much but it should prove a point (to me). I expect that the h1 'Form
Data' should be green, but it displays black.

I have been reading the doc for CGI.pm, specifically the section titled
'Limited support for Cascading Style Sheets'. I must have made an error
but I can't understand where. I tried changing the print h1 to print
$query->h1({-class=>'st1'}, 'Form Data'); and the style sheet to
h1.st1{...} but that didn't seem to make any difference.

I would appreciate all pointers (or references)!

TIA,
Chuck

Reply via email to