请教一个问题，shell 字符串处理

flw

有一个文件，其中有很多行，都是类似这样的：

1. FILE 0755 usbin/activate  pkg/usr/local/sbin/

复制代码

现在如何把每一行变成

1. install -m0755 usbin/activate pkg/usr/local/sbin/
   
2. install -m0755 pkg/usr/local/sbin/activate /usr/local/sbin/

复制代码

这样的两行？

领导说，不让用 Perl，可是我只会 Perl 啊。
有谁在线的话，麻烦帮我写一下好不好？

mocou

1. echo "FILE 0755 usbin/activate  pkg/usr/local/sbin/"|awk '/FILE/{print "install -m"$2,$3,$4;print "install -m"$2,$4substr($3,5),substr($4,4)}'
   
2. install -m0755 usbin/activate pkg/usr/local/sbin/
   
3. install -m0755 pkg/usr/local/sbin/n/activate /usr/local/sbin/

复制代码

不通用，主要是你的几个路径是否定长？

flw

[quote]原帖由 "mocou"]不通用，主要是你的几个路径是否定长？[/quote 发表：

不定长。
我再说明一下，
第一行好办，我自己会弄了，我是这样写的：

1. cat pkg.conf | awk '{
   
2.     if ( ( $0 !~ /^[:space:]*#/ ) && ( $0 !~ /^[:space:]*$/ ) )
   
3.     {
   
4.         if ( $1 == "DIR" )
   
5.         {
   
6.             printf "install -d -m%s %s\n", $2, $3 >> "pkg/install.sh"
   
7.         }
   
8.         else if ( $1 == "FILE" )
   
9.         {
   
10.             printf "install -m%s %s %s\n", $2, $3, $4 >> "pkg/install.sh"
    
11.         }
    
12.     }
    
13. }'
    

复制代码

可是第二行呢？
第二行的规则是，把 $4 做为源路径，并且要带上 $3 的 basename，
然后把去掉 pkg/ 前缀后的部分做为目的路径。
需要做一些字符串操作，
我不会啊。

flw

嗯，我刚才试了一下你的，现在就是如何把 substr($3,5) 和 substr($4,4) 改成通用的就行啦。

flw

妹妹我加了你的 MSN 了，快点上线帮帮我……

mocou

1. echo "FILE 0755 usbin/activate  pkg/usr/local/sbin/abc"|awk '/FILE/{print "install -m"$2,$3,$4;gsub("^[a-z].*/","",$3);temp=$4;gsub("/[^/]*[a-z]$","/",temp);printf "install -m%s %s ",$2,temp$3;gsub("^[a-z][^/]*/","/",$4);print $4}'
   
2. install -m0755 usbin/activate pkg/usr/local/sbin/abc
   
3. install -m0755 pkg/usr/local/sbin/activate /usr/local/sbin/abc

复制代码

substr是按长度取，现在改成用正则
$3删除以字母开头/之前的字符串,删除/之前的字符串，如果你这里的路径有多层，可能得重新写正则
gsub("^[a-z].*/","",$3);
$4，删除字母开头,后面跟一个/的字符串,就是删除第一个/之前的字符串
gsub("^[a-z][^/]*/","/",$4);