use CGI qw(:standard);
print header(
-charset=>big5),start_html("Sinotech Mail Query System");
my $sender=param("user");
print p("<font size=6><B>Report :</B></font>");
print p("<font size=4><B>Sender E-mail Address : </B>$sender\@sinotech.com.tw</f
ont>");
print ("<TABLE border='3'>");
print ("<TR><TD width='150'><B>Messages ID</B></TD><TD width='150'><B>Time</B></
TD><TD width='250'><B>Reciver</B></TD><TD width='150'><B>Status</B></TD></TR>");
