home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #20 / NN_1992_20.iso / spool / comp / unix / question / 10812 < prev    next >
Encoding:
Text File  |  1992-09-08  |  1.6 KB  |  52 lines
  1. Newsgroups: comp.unix.questions
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!news.acns.nwu.edu!nucsrl!ddsw1!dattier
  3. From: dattier@ddsw1.mcs.com (David W. Tamkin)
  4. Subject: Re: need script to rename uppercase filenames
  5. Message-ID: <1992Sep8.022910.4634@ddsw1.mcs.com>
  6. Keywords: script,tar,msdos
  7. Organization: Contributor Account at ddsw1, Chicago, Illinois  60657
  8. References: <699@svcs1.UUCP> <1992Sep3.135042.29363@walter.bellcore.com>
  9. Date: Tue, 8 Sep 1992 02:29:10 GMT
  10. X-Disclaimer:  Material posted in this article is the sole responsibility of
  11.                 the poster and does not represent MCSNet or the system owners.
  12. Lines: 38
  13.  
  14. snk@bae.bellcore.com (Sam Kamens) wrote in
  15. <1992Sep3.135042.29363@walter.bellcore.com>:
  16.  
  17. | #!/bin/ksh
  18. | # Script to rename a list of files to its lowercase equivalent while 
  19. | # stripping extra carriage returns
  20. | #
  21. | 
  22. | USAGE: $0 FILE1 FILE2 FILE3 ...
  23. | 
  24. | for i in $*
  25. | do
  26. |     lowfile=`echo $i | tr [A-Z] [a-z]`
  27. |     
  28. |     cat ${i} | tr -d '\015' > ${lowfile}
  29. |     # you could do rm $i here if you want
  30. | done
  31.  
  32. There's nothing in there that requires ksh rather than sh, but since
  33. you're using ksh anyway, how about
  34.  
  35. typeset -l lowfile
  36. for i
  37. do lowfile=$i
  38.    tr -d '\015' < $i > $lowfile
  39. done
  40.  
  41. | You could also do this with a one-liner:
  42. | 
  43. |     cat $1 | tr -d '\015' > `echo $1 | tr [A-Z] [a-z]`
  44.  
  45. That's the third time in this thread I've seen a suggestion to cat one file
  46. to a pipe.  It's better to save a process and
  47.  
  48. tr -d '\015' < $1 > ...
  49.  
  50. David W. Tamkin   Box 59297   Northtown Station, Illinois  60659-0297
  51. dattier@ddsw1.mcs.com    CompuServe: 73720,1570    MCI Mail: 426-1818
  52.