主页 / unix / 问题 / 696153
Accepted
user1757774
Asked: 2022-03-21 06:23:42 +0800 CST

将文本文件中的单词插入命令

  • 772

我有一个包含 100 多个单词列表的文本文件，每行一个单词：

Oliver.txt
Jack.txt
Noah.txt
Leo.txt
William.txt

我想将文本文件内容转换为

gallery-dl -g -i Oliver.txt > OliverX.txt
gallery-dl -g -i Jack.txt > JackX.txt

依此类推。我怎样才能做到这一点？

text-processing

3 个回答

  1. perl你可以很容易地做到这一点，并且在or中使用几乎相同的语法sed：

    sed：

    $ sed -E 's/(.*).txt/gallery-dl -g -i \1.txt > \1X.txt/' file
gallery-dl -g -i Oliver.txt > OliverX.txt
gallery-dl -g -i Jack.txt > JackX.txt
gallery-dl -g -i Noah.txt > NoahX.txt
gallery-dl -g -i Leo.txt > LeoX.txt
gallery-dl -g -i William.txt > WilliamX.txt

    perl：

    $ perl -pe 's/(.*).txt/gallery-dl -g -i \1.txt > \1X.txt/' file
gallery-dl -g -i Oliver.txt > OliverX.txt
gallery-dl -g -i Jack.txt > JackX.txt
gallery-dl -g -i Noah.txt > NoahX.txt
gallery-dl -g -i Leo.txt > LeoX.txt
gallery-dl -g -i William.txt > WilliamX.txt
    • 2
  2. Best Answer

    在 GNU awk 中：

    awk -i inplace -v FS="." '{print "gallery-dl -g -i " $1 ".txt > " $1 "X.txt"}' FILE

    它将用新内容替换FILE的内容。-i inplace如果您想将新内容打印到标准输出并保持FILE的原始内容完整，请删除。

    • 2

  3. 使用Raku（以前称为 Perl_6）

    raku -pe 's/ ^ (.+) \.txt $ /gallery-dl -g -i $0.txt > $0X.txt/;'

    与@terdon 的 Perl(5) 代码类似，Raku 的捕获从$0Perl(5) 中的 1 开始，而不是从 1 开始。上面的代码要求在扩展名(.+)之前至少有一个字符。Raku 替换运算符左半部分中的\.txt所有非字符都必须转义才能被理解为文字（例如）。最后，Raku 的替换运算符的左半部分默认是允许空白的。alnums///\.txts///

    样本输入：

    Oliver.txt
Jack.txt
Noah.txt
Leo.txt
William.txt

    样本输出：

    gallery-dl -g -i Oliver.txt > OliverX.txt
gallery-dl -g -i Jack.txt > JackX.txt
gallery-dl -g -i Noah.txt > NoahX.txt
gallery-dl -g -i Leo.txt > LeoX.txt
gallery-dl -g -i William.txt > WilliamX.txt

    https://raku.org

    • 0

相关问题