如何找到整数值并比较它们然后传输主文件？

Question

我有一些 .log 的输出文件（5000 个文件），它们是 QM 计算的结果。在每个文件中，有两条特殊的行表示电子和轨道的数量，如下所示（与输出文件中的精确空格相同）：

    Number of electrons               =        9
    Number of orbitals                =       13

我想到了一个脚本（bash 或 Fortran），作为这个问题的解决方案，它 grep 这两行（同时）并获取相应的整数值（例如 9 和 13），比较它们并找到两个值之间的差异，最后，将它们列出在具有相应文件名的新文本文件中。 我非常感谢您提供的任何帮助。

Answer 1

我在GNU Awk 中发布了一个尝试，并且仅在其中进行了测试。

#!/bin/bash

for file in *.log
do
    awk -F'=[[:blank:]]*' '/Number of/{printf "%s%s",$2,(NR%2?" ":RS)}' "$file" | awk 'function abs(v) {return v < 0 ? -v : v} {print abs($1-$2)}' >> output_"$file"
done

我将AWK 逻辑拆分为两个的原因是为了降低在单个巨大命令中执行此操作的复杂性。第一部分用于从日志文件中以列格式提取数字，第二部分用于获取它们的绝对值。

我会分解AWK的逻辑：-

• -F'=[[:blank:]]*' 是一个多字符分隔符逻辑，包括 = 和一个或多个 [[:blank:]] 空白字符实例。

• '/Number of/{printf "%s%s",$2,(NR%2?" ":RS)}' 搜索以 Number of 开头的行并以列方式打印，即示例文件中的 9 13。

• 第二部分是不言自明的。我写了一个函数，从两个返回值中获取绝对值并打印出来。

• 每个输出都保存在一个名为 output_ 的文件中，供您进一步处理。

从命令行以bash script.sh 运行脚本，其中script.sh 是包含上述行的名称。

更新：-

如果您也对负值感兴趣，即没有绝对函数，请将 awk 语句更改为

awk -F'=[[:blank:]]*' '/Number of/{printf "%s%s",$2,(NR%2?" ":RS)}' "$file" | awk '{print ($1-$2)}' >> output_"$file"

Answer 2

这样做的方法不好（但它会起作用）-

while read file
do
    first=$(awk -F= '/^Number/ {print $2}' "$file" | head -1) 
    second=$(awk -F= '/^Number/ {print $2}' "$file" | tail -1) 

    if [ "$first" -gt "$second" ] 
    then 
        echo $(("$first" - "$second")) 
    else 
        echo $(("$second"  - "$first"))
    fi > "$file"_answer ; 
done < list_of_files

此方法获取值（在awk 一个衬里并比较它们。

然后将它们相减，得到一个值，并将其保存在名为“$file”_answer 的文件中。即带有“_answer”作为名称后缀的初始文件名。

您可能需要调整此代码以完全符合您的目的。