#!/usr/bin/perl

print "Content-Type: Text/HTML\n\n";

use CGI ':standard';
use Vpanel 1.00;
require $header;
require $accountinfo;

$domainname = find_domain ($mainuser);

# Define the tab which appears to the front
$tab_section = $tabnum_mailwall;

# Output the content associated with this tab
print "<body class=section-$tab_section>";

# display tabs
require $tabdisplay;

print_header("Removal of an email from the MailWall quarantine for $domainname");

print qq!

You can use this page to release emails and attachments which our Anti-Virus system has placed in quarantine.
Releasing a message will allow the message to bypass some security checks so please don't release a message
unless you are fully confident that it does not contain a Virus, Worm or Trojan.<BR><BR>

Please copy and paste the 'Message ID' and 'Message Reference' from the Virus Notification message you have
received into the boxes below:<BR><BR>

<table width=400 class=text>
<form method=post action=/$script_bin/$quarantine_management_3 class=text>

<tr><td width=200>
Message Reference [ 8 digits ]:</td><td width=100> <input type=text class=text name=ref size=10 maxlength=8><br></td>
</tr>

<tr><td width=200>
Message ID [ 14 characters ]:</td><td width=100>  <input type=text class=text name=id size=17 maxlength=14></td>
</tr></table>


!;

print_end_of_form();
require $footer;
