Expect script to switch profiles in Prismatik

prismatikProfileSwitch.sh

#!/usr/bin/expect

set timeout 5
set host [lindex $argv 0]
set port [lindex $argv 1]
set profile [lindex $argv 2]
set apikey [lindex $argv 3]
spawn telnet $host $port

expect "Lightpack API v1.4 (type \"help\" for more info)\r"
send "apikey:$apikey\r"
expect "ok\r"
send "lock\r"
expect "lock:success\r"
send "setprofile:$profile\r"
expect "ok\r"
send "unlock\r"
expect "unlock:success\r"
exit