}
$subscribers = "";
# get subscribers from mlmmj
$cmd = "/usr/bin/mlmmj-list -L " . escapeshellarg("{$topdir}/{$list}") . " 2>&1";
unset($out);
exec($cmd, $out, $ret);
if ($ret !== 0) {
$message .= "* Error: Could not get subscribers list.\n";
} else {
foreach ($out as $email) {
$email = trim($email);
$form = "<form action=\"subscribers.php?list=" . htmlspecialchars($list) . "\" method=\"post\" style=\"margin: 0; margin-left: 1em\">";
$form .= "<input type=\"hidden\" name=\"email\" value=\"" . htmlspecialchars($email) . "\" />";
$form .= "<input type=\"submit\" name=\"delete\" value=\"Remove\" />";
$form .= "</form>";
$subscribers .= "<tr><td>" . htmlspecialchars($email) . "</td><td>{$form}</td></tr>\n";
}
if ($subscribers === "") {
$subscribers = "<tr><td>This list is empty.</td></tr>\n";
}
}
# get subscribers count from mlmmj
$count = "/usr/bin/mlmmj-list -L " . escapeshellarg("{$topdir}/{$list}") . " -c 2>&1";
# set template vars
$tpl->define(array("main" => "subscribers.html"));
$tpl->assign(array("LIST" => htmlspecialchars($list)));
$tpl->assign(array("MESSAGE" => "<pre>" . htmlspecialchars($message) . "</pre>"));
$tpl->assign(array("SUBS" => $subscribers));
$tpl->assign(array("COUNT" => exec($count)));
$tpl->parse("MAIN", "main");
$tpl->FastPrint("MAIN");
