print <<FRONTTABONE;
<table width=100% class=text border=0>
<tr> 
<td width=40%><b>
FRONTTABONE

print_header ("Your account summary");
print "</td><td width=40%>";
#print_header ("Your contact details");

print <<FRONTABTWO;
</td> 
<td></td>
</tr>
<tr valign=top> 
<td height=24>
<table width=90% class=text>
<tr> 
<td width=26%>Domain:</td>
<td width=74%>$domainname</td>
</tr>
<tr> 
<td>Plan:</td>
FRONTABTWO

	print "<td>$hostingplan Hosting Plan</td></tr>";

	# Calculate the space percentage
	# First see if the space measured is in kb or mb
	($start, $size, $measure) = split (/\s+/, $spaceused);
	if ( $measure =~ /Kb/ )
	{
		$size = $size / 1000;
	}	
	$spacepercent = $size / $spacelimit * 100;
	if ($spacepercent == 0 )
	{
		$spacepercent = 1;
	}
	$spacepercent = sprintf("%.0f", $spacepercent);
	$leftoverpercent = 100 - $spacepercent;

print "<tr><td>Space:</td><td><table width=100% height=15 class=text><tr><td width=87%>";
print "<table width=98% height=10 cellspacing=0 class=text border=2><tr height='10'> ";
	print "<td width=$spacepercent% height=10 bgcolor='#cc0000'></td>";
	if ( $leftoverpercent > 0)
	{
		print "<td width=$leftoverpercent%>";
	}

print <<FRONTTABTWOB;
 </tr>
</table></td>
<td width=13%>$spacepercent%</td>
</tr>
</table></tr>
<tr> 
<td>&nbsp;</td>
FRONTTABTWOB

	print "<td>$spaceused used [quota: $spacelimit Mb] &nbsp; &nbsp; ";
	print "<a href=/$script_bin/$view_space><span class=sidepanel>Details ..</span></a>";
	if ( $leftoverpercent < 0)
	{
		print "<span class=spacewarning><br>* You are currently over your allocated quota *</span>";
	}

	print "</td></tr>";
	print "<tr><td>Users:</td><td>$usersused of $userlimit used";
	print "</td></tr>";

print "<tr><td valign=top>Mailservers:</td><td>";
for ( $i = 0 ; $i < $numservers ; $i++ )
{
	($preference, $mailservername) = split (/\s+/, $mailservers[$i]);
	if ( $i == 0 )
	{
		print "<i>Primary</i>:&nbsp;";
	} else {
		print "<i>Backup $i</i>:&nbsp;";
	}
	print "$mailservername<br>";
}
print "</td></tr>";

if ( $numnameservers > 0 )
{
	print "
	<tr><td valign=top>Nameservers:</td><td>You are not using IE Internet nameservers. 
	Your nameservers are:
	<br>
	";

	for ( $i = 0 ; $i < $numnameservers ; $i++ )
	{
		print "<BR>$nameservers[$i]";
	}	
	show_help("nameservers.pl");
	print "</td></tr>";
}
print "</table> <p>&nbsp;</p></td>";

require "contact_details.pl";

require "side_bar.pl";

print "<TD>&nbsp;</TD>";