teratermマクロ
username = 'kenken'
hostname = '192.168.2.143'
passwfile = 'password.dat'
getpassword passwfile username passwd
msg = hostname
strconcat msg ':22 /ssh /auth=password /user='"
strconcat msg username
strconcat msg ' /passwd='
strconcat msg passwd
connect msg
wait '$'
sendln 'su -'
wait 'パスワード:'
sendln passwd