Hi all.
Excuse me for my bad english.
I write module for easy make of talbe in CGI.That is my first module.He
work like that:
use Table;
my $table = Table->new(-cellpadding=>2,-border=>1,-style=>'cursor:help');
print $table->startTable();
print $table->tr({-rowspan_1=>3,-bgcolor_1=>'red',-bgcolor_2=>'black'},
'CELL1','CELL2','CELL3');
print $table->tr({-style_1=>'font-size:3em'},'aaa','bbb','ccc');
print $table->endTable();
The result is:
<table cellpadding="2" border="1" style="cursor:help">
<tr>
<td rowspan="3" bgcolor="red">CELL1</td>
<td bgcolor="black">CELL2</td>
<td>CELL3</td>
</tr>
<tr>
<td style="font-size:3em">aaa</td>
<td>bbb</td>
<td>ccc</td>
</tr>
</table>
Please tell me what you think about this style.
Best Regards
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
