LINUX.ORG.RU
Ответ на: комментарий от sdio

есть по вэбу, но и там нет "удалить все". А в экспекте я не шарю

deys ★★★
() автор топика
Ответ на: комментарий от sova

если бы был доступ, то сделал бы так. А у меня только по pop3 туда есть возможность почтовым клиентом или телнетом.

deys ★★★
() автор топика
Ответ на: комментарий от deys

#!/bin/expect -f

set server pop3.server.org
set p3user username
set p3pass password
set count 1234

set force_conservative 1
if {$force_conservative} {
        set send_slow {1 .1}
        proc send {ignore arg} {
                sleep .1
                exp_send -s -- $arg
        }
}

set timeout -1
spawn telnet $server 110
match_max 100000
expect "+OK"
send -- "user $p3user\r"
expect "+OK Password required"
send -- "pass $p3pass\r"
expect "+OK"
for {set x 1} {$x <= $count} {incr x} {
        send -- "dele $x\r"
        expect "+OK Message"
}
send -- "quit\r"
expect eof

sdio ★★★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.