Revision 903,
446 bytes
checked in by niltonneto, 15 years ago
(diff) |
Importacao inicial do Expresso do Serpro
|
Rev | Line | |
---|
[903] | 1 | #!/usr/bin/php |
---|
| 2 | |
---|
| 3 | <?php |
---|
| 4 | $listaListas = "list_lists -b"; |
---|
| 5 | $listaTotal = `$listaListas`; |
---|
| 6 | $lista = explode("\n", $listaTotal); |
---|
| 7 | $contaLista = count($lista); |
---|
| 8 | echo "$contaLista\n"; |
---|
| 9 | for ($i=0;$i<$contaLista;$i++) |
---|
| 10 | { |
---|
| 11 | if (($lista[$i] <> "mailman") && ($lista[$i]<>"")) |
---|
| 12 | { |
---|
| 13 | echo "\nRemove a lista -> $lista[$i]\n"; |
---|
| 14 | $removeLista = "rmlist -a $lista[$i]"; |
---|
| 15 | $erroRemoveLista = `$removeLista`; |
---|
| 16 | } |
---|
| 17 | |
---|
| 18 | } |
---|
| 19 | ?> |
---|
Note: See
TracBrowser
for help on using the repository browser.