function vpopmail_listalias($dominio)
{
    $array_listado = array();
    $array_autorespond = array();
    $exec_cmd = _CFG_VPOPMAIL_ALIAS;
    $result = execute_cmd("{$exec_cmd} {$dominio}");
    $x = 0;
    $z = 0;
    for ($i = 0; $i < count($result); $i++) {
        if (strpos($result[$i], "autorespond") === false and strpos($result[$i], "ezmlm") === false and strpos($result[$i], "-owner") === false and strpos($result[$i], "/allow") === false) {
            list($cuenta_origen, $cuenta_destino) = split(_CFG_VPOPMAIL_CFG_CUENTAALIAS, $result[$i], 2);
            if (!array_search_match($cuenta_origen, $array_autorespond)) {
                $array_listado[$x]["cuenta_origen"] = trim($cuenta_origen);
                $array_listado[$x]["cuenta_destino"] = substr(trim($cuenta_destino), 1);
                $x++;
            }
        } elseif (strpos($result[$i], "autorespond") !== false) {
            list($cuenta_origen, $cuenta_destino) = split(_CFG_VPOPMAIL_CFG_CUENTAALIAS, $result[$i], 2);
            $array_autorespond[$z] = trim($cuenta_origen);
            $z++;
        }
    }
    array_multisort($array_listado);
    return $array_listado;
}
function word_exist($cadena, $fichero)
{
    $palabras = file($fichero);
    $resultado = array_search_match($cadena, $palabras);
    return $resultado;
}