我希望所有bgcolour
和red
name=arun
为phone_no=null
,我在perl中运行此html以发送sql查询的电子邮件输出。这里的sql数据是动态的。
以下是代码片段:
$STYLE=<<STYLE;
<style type="text/css">
.mytable { background-color:#E0E0E0;border: 1px solid blue;border-collapse: collapse; }
.mytable th { background-color:#666600;color:white;font-size: 100%; }
.mytable td { padding:3px;border:1px solid #0066FF; }
</style>
push(@HTML,"<table class=\"myTable\" border=1>\12<tr bgcolor=708090><th>name</th><th>college</th><th>phone_no</th></tr>");
$retCode=executeSQL("select name,college,phone_no from source_table");
if($retCode) {
push(@HTML,"<tr><td"> </td><td"></td><td"></td><td">");
push(@HTML,"<td"></td><td></td></tr>\12");
}
push(@HTML,"</table>\12\12");