Automatize a criação de um trabalho usando expect

Question

Estou tentando escrever um script que levará tempo e nome do processo e os transmitirá para agendar o trabalho. Não consigo enviar o EOT.

    #! /usr/bin/expect
    # Usage: setupkill.exp time process.
    # press ctrl-D to finish the at command.

    set time [lindex $argv 0]
    set process [lindex $argv 1]

    spawn at $time
    expect "at>"
    send "/home/jagan/p/killprocess $process\r";
    expect "at>"
    send "^D";

    interact

Este script tem como objetivo encerrar um processo específico em um determinado momento.

Answer 1

Você envia ctrl-D assim:send "\004"

• http://wiki.tcl.tk/3038
• http://expect.sourceforge.net/FAQ.html#q54

Answer 2

Você poderia usar um script de shell simples:

#! /bin/sh
# Usage: setupkill.sh time process.
echo /home/jagan/p/killprocess "$2" | at "$1"

(Desculpe, não sei, expectentão esta é apenas uma solução simples.)