Skunkware 5/Skunkware 5.iso/bin/timed-read

Text File | 1995-07-22 | 201 b | 7 lines

#!/usr/skunk/bin/expect -f
# read a complete line from stdin
# aborting after the number of seconds (given as an argument)
# - Don Libes
set timeout $argv
expect -re \n {send_user $expect_out(buffer)}