Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!cs.utexas.edu!wuarchive!decwrl!ogicse!plains!glaeske
From: glaeske@plains.NoDak.edu (Brian Glaeske)
Newsgroups: comp.sources.wanted
Subject: Re: lowercase routine.
Message-ID: <5822@plains.NoDak.edu>
Date: 11 Sep 90 05:09:41 GMT
References: <745@babcock.cerc.wvu.wvnet.edu> <1990Sep7.204741.21613@uwasa.fi>
Organization: North Dakota State University, Fargo
Lines: 24

Here is the program to put filenames in lowercase.  Have a blast with it.

--Cut Here--
#!/bin/csh
set progname = `basename $0`
foreach file ($*)
        set newname = `echo $file | tr A-Z a-z`
        if  -f $newname then
                echo ${progname}: Will not overwrite ${newname}.
        else
                echo ${progname}: \[$file\]\    -\> \[$newname\]
                mv $file $newname
        endif
end
--Cut Here--



-- 
Brian Glaeske
 -  /|                        glaeske@plains.NoDak.edu  [Internet] 
  o.O`   --Ooop ACK!!         glaeske@plains            [BITNET  ]
=(___)=                       ..!uunet!plains!glaeske   [UUCP    ]
   U    "Bloom County Forever!!"