增加文件中第一行的最后数目

Question

我想编写一个shell脚本，它可以增加某个文件结构的第一行的最后一个值：

File-structure:

p cnf integer integer   
integer integer ... 0

，例如

p cnf 11 9   
1 -2 0  
3 -1 5 0

To:

p cnf 11 10   
1 -2 0  
3 -1 5 0

点应该保持不变。

Answer 1

如果你能用perl

perl -pe  's/(-*\d+)$/$1+1/e' if $. == 1' inputfile

在这里，(-*\d+)$在行尾捕获整数值(可选为负值)，而e标志允许在替换之前执行代码，因此值会增加。