Direktori : /proc/thread-self/root/bin/ |
Current File : //proc/thread-self/root/bin/timed-run |
#!/usr/bin/sh # -*- tcl -*- # The next line is executed by /bin/sh, but not tcl \ exec tclsh "$0" ${1+"$@"} package require Expect # run a program for a given amount of time # i.e. time 20 long_running_program set timeout [lindex $argv 0] eval spawn [lrange $argv 1 end] expect