Как передать пароль scp?

Вот пример того, как Вы делаете это с expect инструмент:

sub copyover {
    $scp=Expect->spawn("/usr/bin/scp ${srcpath}/$file $who:${destpath}
+/$file");
    $scp->expect(30,"ssword: ") || die "Never got password prompt from
+ $dest:$!\n";
    print $scp 'password' . "\n";
    $scp->expect(30,"-re",'$\s') || die "Never got prompt from parent 
+system:$!\n";
    $scp->soft_close();
    return;
}

Альтернатива была бы, добавляет общедоступная половина ключа пользователя к файлу авторизованных ключей в целевой системе. В системе Вы - инициирование передача от, можно выполнить демона ssh-агента и добавить частную половину ключа к агенту. Пакетное задание может тогда быть настроено для использования агента, чтобы получить закрытый ключ, вместо того, чтобы запросить пароль ключа.

Это должно быть выполнимо или в системе UNIX/Linux или в платформе Windows с помощью театрализованного представления и pscp.