tbone has asked for the wisdom of the Perl Monks concerning the following question:
use HTML::Table; my @headers = ("<b><a href='pastRequests.pl?order=Custodial_Code&Name= +$name'>Custodial Code</a></b>", "<b><a href='pastRequests.pl?order=TIME&Name=$name'>Da +te</a></b>", "<b><a href='pastRequests.pl?order=Requestor_Name&Name +=$name'>Requestor's Name</a></b>", "<b>Requestor's Phone Number</b>", "<b>Contact Name</b +>", "<b>Contact Phone Number</b>", "<b>Building</b>", "<b>Room</b>", "<b>Decal #</b>", "< +b>Descr</b>", "<b>Y2K</b>", "<b>CPU</b>", "<b>LAB</b>" , "<b><a href='pastRequests +.pl?order=Technician&Name=$name'>Tech</b>"); my $table = new HTML::Table(-border=>1); $table->addRow(@headers); my $rows=1; print "<div id='printReady'>"; foreach my $row (@$ary_ref){ if ($rows % 20 == 0){ $table->addRow(@headers);} $table->addRow(@$row); $rows++;} for ( 1 .. $table->getTableRows() ) { $table -> setRowStyle( $_,'font-face=arial; size= 11' ); $table -> setRowAlign( $_,"center");} $table->print;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: using HTML::TABLE with netscape
by Thelonius (Priest) on May 09, 2003 at 16:27 UTC | |
|
Re: using HTML::TABLE with netscape
by hardburn (Abbot) on May 09, 2003 at 16:09 UTC | |
|
(jeffa) Re: using HTML::TABLE with netscape
by jeffa (Bishop) on May 09, 2003 at 16:52 UTC |