read d; w3m -dump 'http://quote.yahoo.co.jp/' | awk '/日経平均[0-9]/{gsub(/日経平均/,x,$0);p
rint $1}' x=$d