将任意数据文件中的每个词的第一个字母变成大写

zjya

将任意数据文件中的每个词的第一个字母变成大写
那位大侠，能给小弟提供 一个模板呀

FinalBSD

ls | perl -ne 'chop;printf "%s\n",ucfirst $_;'

awk就是awp加ak

awk

1. awk ' BEGIN {
   
2.         az = "abcdefghijklmnopqrstuvwxyz";
   
3.         AZ = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
   
4. }
   
5. 
   
6. function toUpper(pChar){
   
7.         return substr(AZ, index(az, pChar), 1);
   
8. }
   
9. 
   
10. {
    
11.         for (i=1; i <= NF; i++)
    
12.                 if ($i~/^[a-z]/) sub(/./, toUpper(substr($i, 1, 1)), $i);
    
13.         print;
    
14. }' urfile

复制代码

btw, 如果用 gawk，有 toupper() 函数。

寂寞烈火

我记得论坛里早有讨论：
http://bbs.chinaunix.net/viewthr ... &extra=page%3D1
搜一下论坛吧