Dengan GNU sed, ganti semua spasi di eol dengan garis bawah:
sed ':x;s/ \( *\)$/_\1/;tx'
Lebih efisien menggunakan perl:
perl -lpe 's/(\s+)$/"_" x length($1)/e' input.txt
yang hanya perlu melakukan satu substitusi per baris dengan spasi putih tambahan, bukan perulangan.
Dengan GNU awk untuk arg ke-3 yang cocok() dan gensub():
$ awk 'match($0,/(.*[^ ])(.*)/,a){$0=a[1] gensub(/ /,"_","g",a[2])} 1' file
foo bar_____
foo bar oof
line 3a___
line fo a_
Dengan awk:
$ awk 'match($0,/ +$/){tail=substr($0,RSTART,RLENGTH); gsub(/ /,"_",tail); $0=substr($0,1,RSTART-1) tail} 1' file
foo bar_____
foo bar oof
line 3a___
line fo a_
Untuk mengganti blank awal juga dengan men-tweak solusi gawk di atas:
$ awk 'match($0,/^( *)(.*[^ ])(.*)/,a){$0=gensub(/ /,"_","g",a[1]) a[2] gensub(/ /,"_","g",a[3])} 1' file
foo bar_____
_foo bar oof
__line 3a___
__line fo a_
Bagaimana saya bisa secara rekursif menghapus semua file dan direktori kosong di Linux?
Cara menangkap kata tertentu dan mengambil teks