Perl: DBI problem

[Blood22]

In theory I know what I need but I cannot put it into Perl!
I am creating a schedule table that pulls dates and times from a MySQL table and if they exist highlights a html table.

I need something like this:

print "table...
print "table cell...
test a mysql select statement
print "table cell bgcolor =
red if true or white if false"

print another "table cell...
test a mysql select statement
print "table cell bgcolor =
red if true or white if false"

At present I can only figure out how to connect to the db and retrieve 1 SELECT statement! I don't know how to use multiple statements like I wish to use above. ANY help on this is really appreciated!

Si22.

 

[PaulTEG]

Blood,

Work on generating the table without highlighting first. When you have that code up and running, it'll be easy change as you loop through the array

print &quot;<table width=\&quot;XX\&quot;>&quot;;
print &quot;<whole load of stuff>&quot;;
while ([..processing recordset..]) {
if ([..condition..]) {
$bgcolor=&quot;red&quot;;
} else {
$bgcolor=&quot;white&quot;;
}
print &quot;<td gbcolor=$bgcolor>$variable</td>&quot;;
$colcnt++;
if ($collcnt>$colmax) {
$collcnt=1;
print &quot;</tr><tr>&quot;;
}
}

HTH
--Paul

 

[AHinMaine]

If you're at the beginning stages, now is a good time to start keeping your code seperate from the html. use HTML::Template.

http://search.cpan.org/author/SAMTREGAR/HTML-Template-2.6/

Don't worry. Super easy to use.

--
Andy

http://www.nachoz.com

 

[parkers]

Hi,

If you do not store the SELECT statement output each row at a time (or use it as you retreive it, as I've done in the example) then the SELECT statement will only return the last match.

Heres a potential solution ...

print &quot;<table>&quot;;
print &quot;<tr><th>Date</th><th>Time</th></tr>&quot;;
$sth = $dbh->prepare (&quot;SELECT date,time FROM yourtable&quot;
$sth->execute();
while (my @val = $sth->fetchrow_array())
{
print &quot;<tr><td>$val[0]</td><td>$val[1]</td></tr>&quot;;
}
$sth->finish();
print &quot;</table>&quot;;


... within the while loop you will be able to add conditions to change formatting etc...

Let me know how you get on...