#!/bin/sh
#/
exec expect "$0" "$@"
set timeout 15
#log_user 0
proc printf {msg} {
global argv0
puts "$argv0: $msg"
}
#main function
set fname [lindex $argv 0]
if {! [file exists $fname]} {
printf "file '$fname' not exist."
exit
}
if { [catch {set fp [open $fname r]} result] } {
printf "open file '$fname' error."
exit
}
foreach line [split [read $fp] /n] {
# Process line
puts $line
}
close $fp