set sh "" set mac "0000.1111.2222" for {} {1<2} {} { set ln [gets -] if {[string equal $ln "."]} break set sh "$sh$ln
" if {[string first par.mac $ln] < 0} continue set mac [string range $ln 8 666] } set cmd "packet wakeup eth2 $mac" puts "waker" puts "" puts "mac=$mac

" puts "command
$cmd
[exec $cmd]

" puts "parameters
$sh
" puts ""