#!/usr/bin/expect
spawn ftp -p [lrange $argv 0 0] 2221
expect "Name"
send "francis\n"
expect "Password"
send "francis\n"
expect "Remote"
send "cd /DCIM/camera\n"
expect "Directory"
send "bin\n"
expect "Command TYPE okay"
interact