home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / fj / question / unix / 507 < prev    next >
Encoding:
Text File  |  1992-11-08  |  1.8 KB  |  57 lines
  1. Newsgroups: fj.questions.unix
  2. Path: sparky!uunet!stanford.edu!sun-barr!sh.wide!wnoc-kyo!kuis!isfs!senda
  3. From: senda@kuis.kyoto-u.ac.jp (Shuji Senda)
  4. Subject: Re: foreach on csh / tcsh
  5. In-Reply-To: cabbage@kki.esi.yamanashi.ac.jp's message of Fri, 7 Nov 1992 02:18:35 JST
  6. Message-ID: <SENDA.92Nov9153314@cr-x.kuis.kyoto-u.ac.jp>
  7. Sender: news@kuis.kyoto-u.ac.jp
  8. Nntp-Posting-Host: cr-x.kuis.kyoto-u.ac.jp
  9. Organization: Dept. of Info. Sci., Kyoto Univ
  10. References: <SSASAKI.92Nov6163114@fnews.ee.titech.ac.jp>
  11.     <CABBAGE.92Nov7021835@kki.esi.yamanashi.ac.jp>
  12. Distribution: fj
  13. Date: Mon, 9 Nov 1992 06:33:14 GMT
  14. Lines: 41
  15.  
  16.  
  17. In article <CABBAGE.92Nov7021835@kki.esi.yamanashi.ac.jp>, cabbage@kki.esi.yamanashi.ac.jp (Masami Ueno) writes:
  18.  
  19. Masami> $@$3$s(J$@$J%9%/%j%W%H:n$C$F(J 
  20. Masami> -- doeach ----------------------------- cut!
  21. Masami> #!/bin/csh -f
  22. Masami> foreach tmp ($2)
  23. Masami> set a = '$'$1
  24. Masami> set cmd = `echo $3|sed "s/$a/$tmp/g"`
  25. Masami> /bin/csh -c "$cmd"
  26. Masami> end
  27. Masami> --------------------------------------- cut!
  28. Masami>  % doeach file "*" 'echo $file'
  29. Masami>                ~|~ ~~~~~|~~~~~
  30. Masami>                 |       +-- $@%7%s%0%k%/(J$@%*!<%H$G3g$k(J
  31. Masami>                 +-- $@%@%V%k%/%*!<%H$G3g$k(J
  32. Masami> $@$J$s$F$$$&$N$O$I$&$G$7$g$&!)(J
  33.  
  34.     $@%9%/%j%W%H$G$$$$$J$i;d$,;H$C$F$k$d$D$O!"(J
  35.  
  36. ---------------- forarg -----------------
  37. #! /bin/sh
  38. if [ $# = 0 ] ; then
  39.     echo Usage : $0 command arguments
  40.     exit
  41. fi
  42. command=$1 ; shift
  43. for arg in $*
  44. do
  45.     eval $command
  46. done
  47. ---------------- forarg -----------------
  48.  
  49.     $@$[$s$G$b$C$F;H$$J}$O!"(J
  50.  
  51. % forarg 'echo $arg' *
  52.  
  53.     $@$G$9!#(J(* $@$NE83+$O%7%'%k$KG$$;$A$c$&(J)
  54. --
  55. JUNET      : senda@kuis.kyoto-u.ac.jp ($@@gED=$;J!wCSED8&(J.$@5~Bg>pJs(J)
  56. Nifty Serve: NAG01567 ($@#C#y#b#e#r(J $@#S#p#o#r#t#s(J $@#C#R!]#X(J) FLABO staff
  57.