Use expect to automate scp with password

rscp

#!/usr/bin/env expect

set timeout 120

set login [lindex $argv 0]
set password [lindex $argv 1]
set f [lindex $argv 2]
set r [lindex $argv 3]

spawn scp $f $login:$r

expect {
    "assword:" {
        send "$password\r"
    }
}

expect {
    "$ "
}