spawn ssh $username@$server
expect -re "password:" {
   send "$password\r"
}
expect "$"
send "cd $user_dir\r"
expect "$"
send "/bnr/tools/peel/peel $context_sname\r"
expect "Peel already running" {
   exit
}
expect ">"
send "\n\r"
expect ">"
send "traceci me\r"
send "\n\r"
expect ">"
send "tabxfr\r"
send "\n\r"
expect ">"
send "setup lbrest\r"
send "\n\r"
set timeout 20
expect ">"
send "\003\r"
expect "emdebug"
send "cd table_dump\r"
expect ">"
send "go\r"
send "\n\r"
expect ">"
send "rmount hpdisk\r"
expect ">"
send "startxfr\r"
set timeout 100
expect ">" 
send "quit all\r"
expect ">"
send "bsyall noex\r"
send "y\r"
set timeout 20
expect ">"
send "\003\r"
expect "emdebug>"
send "cd ..\r"
expect ">"
send "go\r"
send "\n\r"
expect ">"
send "hpdump 'DATAFILL_smtxv19ap'\r"
interact