Help for this page
#!/usr/bin/perl ... print "<TR><TD>$rbports</TD><TD>$oraports</TD></TR>"; print "</TABLE>"; print "</HTML>";