更改每一行以捕捉斜線和單獨的

Question

我有很多行的大多數行重複，想要改變每一行中包含「查找」使最後一個「/」分離和添加後它「-name」。

txt文件：

find /etc/cron.* 
find /etc/inet.d/*.conf 
find /etc/rc* 
grep root /etc/passwd 

預期的觀點：

find /etc/ -name cron.* 
find /etc/inet.d/ -name *.conf 
find /etc/ -name rc* 
grep root /etc/passwd 

Answer 1

修改只包含find每一行：

$ awk '/^find /{$NF=" -name "$NF}1' FS='/' OFS='/' file 
find /etc/ -name cron.* 
find /etc/inet.d/ -name *.conf 
find /etc/ -name rc* 
grep root /etc/passwd 

Answer 2

這應該工作：

awk 'BEGIN{FS=OFS="/"}{$NF=" -name "$NF}1' file 

$ cat file 
find /etc/cron.* 
find /etc/inet.d/*.conf 
find /etc/rc* 
grep root /etc/passwd 

$ awk 'BEGIN{FS=OFS="/"}{$NF=" -name "$NF}1' file 
find /etc/ -name cron.* 
find /etc/inet.d/ -name *.conf 
find /etc/ -name rc* 
grep root /etc/ -name passwd 

Answer 3

perl -wpe's!^(find.*/)!$1 -name !' file 

添加-i -wpe之前實際更改文件。

在更現代的perl版本：

perl -wpe's!^(find.*/)\K! -name !' file 

Answer 4

use warnings; 
use strict; 

open (FILE, "$ARGV[0]"); #pass file containing commands as first argument 
my @file_contents = <FILE>; 
close FILE; 

#my @file_contents = (
# 'find /etc/cron.*', 
# 'find /etc/inet.d/*.conf', 
# 'find /etc/rc*', 
# 'grep root /etc/passwd', 
#); 

#Build command line 
foreach my $line (@file_contents){ 
    chomp $line; 
    $line =~ s/(.*?) (\/.*\/)(.*)/$1 $2 -name $3/ if $line =~ /find/; 
    print "$line\n"; 
}