rc/bin/stock

   1 #!/bin/rc
   2
   3 stock=ALU
   4
   5 if(! ~ $#* 0) stock=`{echo $*|tr a-z A-Z|sed 's/ /+/g'}
   6
   7 hget 'http://download.finance.yahoo.com/d/quotes.csv?s='^$stock^'&f=snl1d1c1v&e=.exe' |
   8         sed 's/ +"/"/;s/\r//' |
   9         switch(`{date}){
  10         case *'Apr 1 '*
  11                 sed 's/("ALU","ALCATEL LUCENT"),([^,]*),(.*)$/\1,72.35,\3/'
  12         case *
  13                 cat
  14         }