john,smith
george,kent
etc.
etc.

to

John,Smith
George,Kent
etc.
etc.

Thanks in advance.

Well, how about the following sed script:

  6,${s/^a/A/
      s/^b/B/
      s/^c/C/
        :
      s/^z/Z/
      s/,a/,A/
      s/,b/,B/
      s/,c/,C/
        :
      s/,z/,Z/
     }

There may be scripts that are shorter or will run faster
but I doubt you'll find something simpler.

Regards,
Doug Hamilton  KD1UJ  hamil...@bix.com  Ph 508-440-8307  FAX 508-440-8308
Hamilton Laboratories, 21 Shadow Oak Drive, Sudbury, MA  01776-3165, USA

hamilton> Well, how about the following sed script:

hamilton>   6,${s/^a/A/
hamilton>       s/^b/B/
hamilton>       s/^c/C/
hamilton>         :
hamilton>       s/^z/Z/
hamilton>       s/,a/,A/
hamilton>       s/,b/,B/
hamilton>       s/,c/,C/
hamilton>         :
hamilton>       s/,z/,Z/
hamilton>      }

hamilton> There may be scripts that are shorter or will run faster
hamilton> but I doubt you'll find something simpler.

Well, I think *this* is pretty simple:

        perl -pe 's/\w+/\u$&/g if 6..eof' somefile

And it's also likely to be faster, and it is *clearly* shorter.

print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
# legal fund: $16989.84 collected, $162159.85 spent; email f...@stonehenge.com for details
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <mer...@stonehenge.com> Snail: (Call) PGP-Key: (finger mer...@ora.com)
Web: <A HREF="http://www.teleport.com/~merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me

If you're using vi you can use the substitute command:

 :6,$s/\<./\u&/g

Hope this helps.  It worked for me.

--
Scott Erwin                
sle5...@bjcmail.carenet.org
"It never hurts to help!" -Eek the Cat