如何对该文本文件中的行进行排序？

Question 1

我的首选是 DSU（装饰/排序/取消装饰）。

你拿出一把新的钥匙，它是圆锥形固定格式的。也就是说，您允许最大的书名（如果有变化，则可能是大写），使数字固定长度和零填充（对浮点等进行特殊处理），以及任何其他格式问题。如果您的数据是 UTF-8，您可能需要对关键部分进行 ASCII 转换并在 LC_ALL=C 下排序。

因此，您的 DSU 可能首先在前面添加一个新密钥，如下所示：

MATTHEW          |002|013|Matthew 2:13–3:6
GENESIS          |013|005|Genesis 13:5–15:21
PSALM            |007|001|Psalm 7:1-17

这使您能够进行普通排序——根本没有关键规范，对整行进行字符串排序。

最后，排序完成后，您将截掉前 26 个（或其他）字节。

我不知道你会如何处理11:1–13:4, 或任何重叠的范围（我什至不确定它们意味着什么）。

我通常使用 awk 来完成装饰部分，并使用合适的 printf 格式。

网上有按顺序排列的圣经书籍列表（事实上，有几个不同的版本）。这将是大约 80 个标题的经过验证的查找表的一个附带问题，并使用 DSU 的索引号而不是文本名称。 Awk 在这种情况下也很好。可能存在拼写差异（2 表示 II 等）。

这实际上比使用排序键稍微好一些。sort每次比较时都会对多个键进行比较，因此通常为 O(n log n) 次。 DSUn预先进行计时，成本为 O(n)。它不会影响比较阶段的性能，因为无论如何每次都会在第一个差异处终止。

Answer

我的首选是 DSU（装饰/排序/取消装饰）。

你拿出一把新的钥匙，它是圆锥形固定格式的。也就是说，您允许最大的书名（如果有变化，则可能是大写），使数字固定长度和零填充（对浮点等进行特殊处理），以及任何其他格式问题。如果您的数据是 UTF-8，您可能需要对关键部分进行 ASCII 转换并在 LC_ALL=C 下排序。

因此，您的 DSU 可能首先在前面添加一个新密钥，如下所示：

MATTHEW          |002|013|Matthew 2:13–3:6
GENESIS          |013|005|Genesis 13:5–15:21
PSALM            |007|001|Psalm 7:1-17

这使您能够进行普通排序——根本没有关键规范，对整行进行字符串排序。

最后，排序完成后，您将截掉前 26 个（或其他）字节。

我不知道你会如何处理11:1–13:4, 或任何重叠的范围（我什至不确定它们意味着什么）。

我通常使用 awk 来完成装饰部分，并使用合适的 printf 格式。

网上有按顺序排列的圣经书籍列表（事实上，有几个不同的版本）。这将是大约 80 个标题的经过验证的查找表的一个附带问题，并使用 DSU 的索引号而不是文本名称。 Awk 在这种情况下也很好。可能存在拼写差异（2 表示 II 等）。

这实际上比使用排序键稍微好一些。sort每次比较时都会对多个键进行比较，因此通常为 O(n log n) 次。 DSUn预先进行计时，成本为 O(n)。它不会影响比较阶段的性能，因为无论如何每次都会在第一个差异处终止。

Question 2

使用乐（以前称为 Perl_6）

~$ raku -e 'my @books = "/path/to/books.txt".IO.lines; my %verses;
            for "/path/to/verses.txt".IO.lines.map( *.match( / (^ .+? )  \s+ ((\d+)  \:  .+? ) $ /)) {
                %verses.push: ($_.[0].Str => $_.[1][0].Str => $_.[1].Str)
            };  for @books { put $_ => %verses{$_}  if %verses{$_} };'

这个答案使用 Raku 编程语言，它提供 Perl 风格的%签名哈希来完成 OP 的整理任务。

lines文件的第一个books.txt被读入并存储在@books数组中。文件lines的第二个verses.txt被迭代。调用map用于寻址每一行，并在结束每一行的章节/节结构之前的一个或多个空格之前match查找(^ .+?)该行上的初始单词。括号用于捕获匹配，因此书籍、章节和章节/诗句都被捕获并编辑到哈希中。然后简单地，为了以所需的顺序获取书籍，将迭代数组，并询问哈希以查看它是否包含与主题变量等效的键。如果是这样，则返回键和值（该子句禁止输出没有值的书籍）。\s+((\d+) \: .+?)push%verses@books%verses$_$_ => %verses{$_}if %verses{$_}

请注意，如果使用以下调用，读取输出可能会更容易say：

示例输出（say仅使用前 10 行）：

Genesis => [1 => 1:1–2:25 3 => 3:1–4:26 5 => 5:1–7:24 8 => 8:1–10:32 11 => 11:1–13:4 13 => 13:5–15:21 16 => 16:1–18:15 18 => 18:16–19:38 20 => 20:1–22:24 23 => 23:1–24:51 24 => 24:52–26:16 26 => 26:17–27:46 28 => 28:1–29:35 30 => 30:1–31:16 31 => 31:17–32:12 32 => 32:13–34:31 35 => 35:1–36:43 37 => 37:1–38:30 39 => 39:1–41:16 41 => 41:17–42:17 42 => 42:18–43:34 44 => 44:1–45:28 46 => 46:1–47:31 48 => 48:1–49:33]
Exodus => [2 => 2:11–3:22 4 => 4:1–5:21 5 => 5:22–7:25 8 => 8:1–9:35 10 => 10:1–12:13 12 => 12:14–13:16 13 => 13:17–15:18 15 => 15:19–17:7 17 => 17:8–19:15 19 => 19:16–21:21 21 => 21:22–23:13 23 => 23:14–25:40 26 => 26:1–27:21 28 => 28:1-43 29 => 29:1–30:10 30 => 30:11–31:18 32 => 32:1–33:23 34 => 34:1–35:9 35 => 35:10–36:38 37 => 37:1–38:31 39 => 39:1–40:38]
Leviticus => [1 => 1:1–3:17 4 => 4:1–5:19 6 => 6:1–7:27 7 => 7:28–9:6 9 => 9:7–10:20 11 => 11:1–12:8 13 => 13:1-59 14 => 14:1-57 15 => 15:1–16:28 16 => 16:29–18:30 19 => 19:1–20:21 20 => 20:22–22:16 22 => 22:17–23:44 24 => 24:1–25:46 25 => 25:47–27:13]
Numbers => [2 => 2:1–3:51 4 => 4:1–5:31 6 => 6:1–7:89 8 => 8:1–9:23 10 => 10:1–11:23 11 => 11:24–13:33 14 => 14:1–15:16 15 => 15:17–16:40 16 => 16:41–18:32 19 => 19:1–20:29 21 => 21:1–22:20 22 => 22:21–23:30 24 => 24:1–25:18 26 => 26:1-51 26 => 26:52–28:15 28 => 28:16–29:40 30 => 30:1–31:54 32 => 32:1–33:39 33 => 33:40–35:34]
Deuteronomy => [2 => 2:1–3:29 4 => 4:1-49 5 => 5:1–6:25 7 => 7:1–8:20 9 => 9:1–10:22 11 => 11:1–12:32 13 => 13:1–15:23 16 => 16:1–17:20 18 => 18:1–20:20 21 => 21:1–22:30 23 => 23:1–25:19 26 => 26:1–27:26 28 => 28:1-68 29 => 29:1–30:20 31 => 31:1–32:27 32 => 32:28-52 33 => 33:1-29]
Joshua => [3 => 3:1–4:24 5 => 5:1–7:15 7 => 7:16–9:2 9 => 9:3–10:43 11 => 11:1–12:24 13 => 13:1–14:15 15 => 15:1-63 16 => 16:1–18:28 19 => 19:1–20:9 21 => 21:1–22:20 22 => 22:21–23:16 24 => 24:1-33]
Judges => [1 => 1:1–2:9 2 => 2:10–3:31 4 => 4:1–5:31 6 => 6:1-40 7 => 7:1–8:17 8 => 8:18–9:21 9 => 9:22–10:18 11 => 11:1–12:15 13 => 13:1–14:20 15 => 15:1–16:31 17 => 17:1–18:31 19 => 19:1–20:48]
Ruth => 2 => 2:1–4:22
Ezra => [1 => 1:1–2:70 3 => 3:1–4:23 4 => 4:24–6:22 7 => 7:1–8:20 8 => 8:21–9:15 10 => 10:1-44]
Nehemiah => [1 => 1:1–3:14 3 => 3:15–5:13 9 => 9:22–10:39 11 => 11:1–12:26 12 => 12:27–13:31]

示例输出（所有行，用put分隔列\t）：

Genesis 1   1:1–2:25 3  3:1–4:26 5  5:1–7:24 8  8:1–10:32 11    11:1–13:4 13    13:5–15:21 16   16:1–18:15 18   18:16–19:38 20  20:1–22:24 23   23:1–24:51 24   24:52–26:16 26  26:17–27:46 2828:1–29:35 30 30:1–31:16 31   31:17–32:12 32  32:13–34:31 35  35:1–36:43 37   37:1–38:30 39   39:1–41:16 41   41:17–42:17 42  42:18–43:34 44  44:1–45:28 46   46:1–47:31 48   48:1–49:33
Exodus  2   2:11–3:22 4 4:1–5:21 5  5:22–7:25 8 8:1–9:35 10 10:1–12:13 12   12:14–13:16 13  13:17–15:18 15  15:19–17:7 17   17:8–19:15 19   19:16–21:21 21  21:22–23:13 23  23:14–25:40 2626:1–27:21 28 28:1-43 29  29:1–30:10 30   30:11–31:18 32  32:1–33:23 34   34:1–35:9 35    35:10–36:38 37  37:1–38:31 39   39:1–40:38
Leviticus   1   1:1–3:17 4  4:1–5:19 6  6:1–7:27 7  7:28–9:6 9  9:7–10:20 11    11:1–12:8 13    13:1-59 14  14:1-57 15  15:1–16:28 16   16:29–18:30 19  19:1–20:21 20   20:22–22:16 22  22:17–23:44 24  24:1–25:46 25   25:47–27:13
Numbers 2   2:1–3:51 4  4:1–5:31 6  6:1–7:89 8  8:1–9:23 10 10:1–11:23 11   11:24–13:33 14  14:1–15:16 15   15:17–16:40 16  16:41–18:32 19  19:1–20:29 21   21:1–22:20 22   22:21–23:30 2424:1–25:18 26 26:1-51 26  26:52–28:15 28  28:16–29:40 30  30:1–31:54 32   32:1–33:39 33   33:40–35:34
Deuteronomy 2   2:1–3:29 4  4:1-49 5    5:1–6:25 7  7:1–8:20 9  9:1–10:22 11    11:1–12:32 13   13:1–15:23 16   16:1–17:20 18   18:1–20:20 21   21:1–22:30 23   23:1–25:19 26   26:1–27:26 28   28:1-68 29  29:1–30:20 31   31:1–32:27 32   32:28-52 33 33:1-29
Joshua  3   3:1–4:24 5  5:1–7:15 7  7:16–9:2 9  9:3–10:43 11    11:1–12:24 13   13:1–14:15 15   15:1-63 16  16:1–18:28 19   19:1–20:9 21    21:1–22:20 22   22:21–23:16 24  24:1-33
Judges  1   1:1–2:9 2   2:10–3:31 4 4:1–5:31 6  6:1-40 7    7:1–8:17 8  8:18–9:21 9 9:22–10:18 11   11:1–12:15 13   13:1–14:20 15   15:1–16:31 17   17:1–18:31 19   19:1–20:48
Ruth    2   2:1–4:22
Ezra    1   1:1–2:70 3  3:1–4:23 4  4:24–6:22 7 7:1–8:20 8  8:21–9:15 10    10:1-44
Nehemiah    1   1:1–3:14 3  3:15–5:13 9 9:22–10:39 11   11:1–12:26 12   12:27–13:31
Esther  1   1:1–3:15 4  4:1–7:10 8  8:1–10:3
Job 1   1:1–3:26 4  4:1–7:21 8  8:1–11:20 12    12:1–15:35 16   16:1–19:29 20   20:1–22:30 23   23:1–27:23 28   28:1–30:31 31   31:1–33:33 34   34:1–36:33 37   37:1–39:30 40   40:1–42:17
Psalms  90  90:1–91:16 92   92:1–93:5 95    95:1–96:13 97   97:1–98:9 113   113:1–114:8 90  90:1–91:16 92   92:1–93:5 95    95:1–96:13 97   97:1–98:9 113   113:1–114:8
Proverbs    1   1:1-6 1 1:7-9 1 1:10-19 1   1:20-23 1   1:24-28 1   1:29-33 2   2:1-5 2 2:6-15 2    2:16-22 3   3:1-6 3 3:7-8 3 3:9-10 3    3:11-12 3   3:13-15 3   3:16-18 3   3:19-20 3   3:21-26 3   3:27-32 3   3:33-35 4   4:1-6 4 4:7-10 4    4:11-13 4   4:14-19 4   4:20-27 5   5:1-6 5 5:7-14 5    5:15-21 5   5:22-23 6   6:1-5 6 6:6-11 6    6:12-15 6   6:16-19 6   6:20-26 6   6:27-35 7   7:1-5 7 7:6-23 7    7:24-27 8   8:1-11 8    8:12-13 8   8:14-26 8   8:27-32 8   8:33-36 9   9:1-6 9 9:7-8 9 9:9-10 9    9:11-12 9   9:13-18 10  10:1-2 10   10:3-4 10   10:6-7 10   10:8-9 10   10:11-12 10 10:13-14 10 10:15-16 10 10:20-21 10 10:24-25 10 10:27-28 10 10:29-30 10 10:31-32 11 11:1-3 11   11:5-6 11   11:9-11 11  11:12-13 11 11:16-17 11 11:18-19 11 11:20-21 11 11:24-26 11 11:29-31 12 12:2-3 12   12:5-7 12   12:8-9 12   12:12-14 12 12:15-17 12 12:19-20 12 12:21-23 12 12:27-28 13 13:2-3 13   13:5-6 13   13:7-8 13   13:9-10 13  13:12-14 13 13:15-16 13 13:17-19 13 13:20-23 13 13:24-25 14 14:1-2 14   14:3-4 14   14:5-6 14   14:7-8 14   14:9-10 14  14:11-12 14 14:13-14 14 14:15-16 14 14:17-19 14 14:20-21 14 14:22-24 14 14:26-27 14 14:28-29 14 14:30-31 14 14:32-33 14 14:34-35 15 15:1-3 15   15:5-7 15   15:8-10 15  15:12-14 15 15:15-17 15 15:18-19 15 15:20-21 15 15:22-23 15 15:24-26 15 15:27-28 15 15:29-30 15 15:31-32 16 16:1-3 16   16:4-5 16   16:6-7 16   16:8-9 16   16:10-11 16 16:12-13 16 16:14-15 16 16:16-17 16 16:19-20 16 16:21-23 16 16:26-27 16 16:28-30 16 16:31-33 17 17:2-3 17   17:4-5 17   17:7-8 17   17:9-11 17  17:12-13 17 17:14-15 17 17:17-18 17 17:19-21 17 17:24-25 17 17:27-28 18 18:2-3 18   18:4-5 18   18:6-7 18   18:9-10 18  18:11-12 18 18:14-15 18 18:16-18 18 18:20-21 18 18:23-24 19 19:1-3 19   19:4-5 19   19:6-7 19   19:8-9 19   19:10-12 19 19:13-14 19 19:15-16 19 19:18-19 19 19:20-21 19 19:22-23 19 19:24-25 19 19:27-29 20 20:2-3 20   20:4-6 20   20:8-10 20  20:13-15 20 20:16-18 20 20:20-21 20 20:22-23 20 20:24-25 20 20:26-27 20 20:28-30 21 21:1-2 21   21:5-7 21   21:8-10 21  21:11-12 21 21:14-16 21 21:17-18 21 21:19-20 21 21:21-22 21 21:23-24 21 21:25-26 21 21:28-29 21 21:30-31 22 22:2-4 22   22:5-6 22   22:8-9 22   22:10-12 22 22:17-19 22 22:20-21 22 22:22-23 22 22:24-25 22 22:26-27 22 22:28-29 23 23:1-3 23   23:4-5 23   23:6-8 23   23:9-11 23  23:13-14 23 23:15-16 23 23:17-18 23 23:19-21 23 23:25-28 23 23:29-35 24 24:1-2 24   24:3-4 24   24:5-6 24   24:9-10 24  24:11-12 24 24:13-14 24 24:15-16 24 24:17-20 24 24:21-22 24 24:23-25 24 24:28-29 24 24:30-34 25 25:1-5 25   25:6-8 25   25:9-10 25  25:11-14 25 25:18-19 25 25:20-22 25 25:23-24 25 25:25-27 26 26:1-2 26   26:3-5 26   26:6-8 26   26:9-12 26  26:13-16 26 26:18-19 26 26:21-22 26 26:24-26 27 27:1-2 27   27:4-6 27   27:7-9 27   27:15-16 27 27:18-20 27 27:21-22 27 27:23-27 28 28:3-5 28   28:6-7 28   28:8-10 28  28:12-13 28 28:15-16 28 28:17-18 28 28:19-20 28 28:21-22 28 28:23-24 28 28:25-26 28 28:27-28 29 29:2-4 29   29:5-8 29   29:9-11 29  29:12-14 29 29:15-17 29 29:19-20 29 29:21-22 29 29:24-25 29 29:26-27 30 30:1-4 30   30:5-6 30   30:7-9 30   30:11-14 30 30:15-16 30 30:18-20 30 30:21-23 30 30:24-28 30 30:29-31 31 31:1-7 31   31:8-9 31   31:10-24 31 31:25-31
Ecclesiastes    1   1:1–3:22 4  4:1–6:12 7  7:1–9:18 10 10:1–12:14
Isaiah  1   1:1–2:22 3  3:1–5:30 6  6:1–7:25 8  8:1–9:21 10 10:1–11:16 12   12:1–14:32 15   15:1–18:7 19    19:1–21:17 22   22:1–24:23 25   25:1–28:13 28   28:14–30:11 30  30:12–33:9 3333:10–36:22 37 37:1–38:22 39   39:1–41:16 41   41:17–43:13 43  43:14–45:10 45  45:11–48:11 48  48:12–50:11 51  51:1–53:12 54   54:1–57:14 57   57:15–59:21 60  60:1–62:5 62    62:6–65:25 66   66:1-24
Jeremiah    1   1:1–2:30 2  2:31–4:18 4 4:19–6:15 6 6:16–8:7 8  8:8–9:26 10 10:1–11:23 12   12:1–14:10 14   14:11–16:15 16  16:16–18:23 19  19:1–21:14 22   22:1–23:20 23   23:21–25:38 26  26:1–27:22 28   28:1–29:32 30   30:1–31:26 31   31:27–32:44 33  33:1–34:22 35   35:1–36:32 37   37:1–38:28 39   39:1–41:18 42   42:1–44:23 44   44:24–47:7 48   48:1–49:22 49   49:23–50:46 5151:1-53 51    51:54–52:34
Lamentations    3   3:1-66 4    4:1–5:22
Ezekiel 1   1:1–3:15 3  3:16–6:14 7 7:1–9:11 10 10:1–11:25 12   12:1–14:11 14   14:12–16:41 16  16:42–17:24 18  18:1–19:14 20   20:1-49 21  21:1–22:31 23   23:1-49 24  24:1–26:21 2727:1–28:26 29  29:1–30:26 31   31:1–32:32 33   33:1–34:31 35   35:1–36:38 37   37:1–38:23 39   39:1–40:27 40   40:28–41:26 42  42:1–43:27 44   44:1–45:12 45   45:13–46:24 47  47:1–48:35
Daniel  1   1:1–2:23 2  2:24–3:30 4 4:1-37 5    5:1-31 6    6:1-28 7    7:1-28 8    8:1-27 9    9:1–11:1 11 11:2-35 11  11:36–12:13
Hosea   1   1:1–3:5 4   4:1–5:15 6  6:1–9:17 10 10:1–14:9
Joel    1   1:1–3:21
Amos    1   1:1–3:15 4  4:1–6:14 7  7:1–9:15
Obadiah 1   1:1-21
Jonah   1   1:1–4:11
Micah   1   1:1–4:13 5  5:1–7:20
Nahum   1   1:1–3:19
Habakkuk    1   1:1–3:19
Zephaniah   1   1:1–3:20
Haggai  1   1:1–2:23
Zechariah   1   1:1-21 2    2:1–3:10 4  4:1–5:11 6  6:1–7:14 8  8:1-23 9    9:1-17 10   10:1–11:17 12   12:1–13:9 14    14:1-21
Malachi 1   1:1–2:17 3  3:1–4:6
Matthew 1   1:1–2:12 2  2:13–3:6 3  3:7–4:11 4  4:12-25 5   5:1-26 5    5:27-48 6   6:1-24 6    6:25–7:14 7 7:15-29 8   8:1-17 8    8:18-34 9   9:1-17 9    9:18-38 10  10:1-23 10  10:24–11:6 11   11:7-30 12  12:1-21 12  12:22-45 12 12:46–13:23 13  13:24-46 13 13:47–14:12 14  14:13-36 15 15:1-28 15  15:29–16:12 16  16:13–17:9 1717:10-27 18    18:1-20 18  18:21–19:12 19  19:13-30 20 20:1-28 20  20:29–21:22 21  21:23-46 22 22:1-33 22  22:34–23:12 23  23:13-39 24 24:1-28 24  24:29-51 25 25:1-30 25  25:31–26:13 26  26:14-46 26 26:47-68 26 26:69–27:14 27  27:15-31 27 27:32-66 28 28:1-20
Mark    1   1:1-28 1    1:29–2:12 2 2:13–3:6 3  3:7-30 3    3:31–4:25 4 4:26–5:20 5 5:21-43 6   6:1-29 6    6:30-56 7   7:1-23 7    7:24–8:10 8 8:11-38 9   9:1-29 9    9:30–10:12 10   10:13-31 10 10:32-52 11 11:1-25 11  11:27–12:17 12  12:18-37 12 12:38–13:13 13  13:14-37 14 14:1-21 14  14:22-52 14 14:53-72 15 15:1-47 16  16:1-20
Luke    1   1:1-25 1    1:26-56 1   1:57-80 2   2:1-35 2    2:36-52 3   3:1-22 3    3:23-38 4   4:1-30 4    4:31–5:11 5 5:12-28 5   5:29–6:11 6 6:12-38 6   6:39–7:10 7 7:11-35 7   7:36–8:3 8  8:4-21 8    8:22-39 8   8:40–9:6 9  9:7-27 9    9:28-50 9   9:51–10:12 10   10:13-37 10 10:38–11:13 11  11:14-36 11 11:37–12:7 1212:8-34 12 12:35-59 13 13:1-21 13  13:22–14:6 14   14:7-35 15  15:1-32 16  16:1-18 16  16:19–17:10 17  17:11-37 18 18:1-17 18  18:18-43 19 19:1-27 19  19:28-48 20 20:1-26 20  20:27-47 21 21:1-28 21  21:29–22:13 22  22:14-34 22 22:35-53 22 22:54–23:12 23  23:13-43 23 23:44–24:12 24  24:13-53
John    1   1:1-28 1    1:29-51 2   2:1-25 3    3:1-21 3    3:22–4:3 4  4:4-42 4    4:43-54 5   5:1-23 5    5:24-47 6   6:1-21 6    6:22-42 6   6:43-71 7   7:1-30 7    7:31-53 8   8:1-20 8    8:21-30 8   8:31-59 9   9:1-41 10   10:1-21 10  10:22-42 11 11:1-54 11  11:55–12:19 12  12:20-50 13 13:1-30 13  13:31–14:14 14  14:15-31 15 15:1-27 16  16:1-33 17  17:1-26 18  18:1-24 18  18:25–19:22 19  19:23-42 20 20:1-31 21  21:1-25
Acts    1   1:1-26 2    2:1-47 3    3:1-26 4    4:1-37 5    5:1-42 6    6:1-15 7    7:1-29 7    7:30-50 7   7:51–8:13 8 8:14-40 9   9:1-25 9    9:26-43 10  10:1-23 10  10:24-48 11 11:1-30 12  12:1-23 12  12:24–13:15 13  13:16-41 13 13:42–14:7 14   14:8-28 15  15:1-35 15  15:36–16:15 16  16:16-40 17 17:1-34 18  18:1-22 18  18:23–19:12 19  19:13-41 20 20:1-38 21  21:1-17 21  21:18-36 21 21:37–22:16 22  22:17–23:10 23  23:11-35 24 24:1-27 25  25:1-27 26  26:1-32 27  27:1-20 27  27:21-44 28 28:1-31
Romans  1   1:1-17 1    1:18-32 2   2:1-24 2    2:25–3:8 3  3:9-31 4    4:1-12 4    4:13–5:5 5  5:6-21 6    6:1-23 7    7:1-13 7    7:14–8:8 8  8:9-25 8    8:26-39 9   9:1-24 9    9:25–10:13 10   10:14–11:12 11  11:13-36 12 12:1-21 13  13:1-14 14  14:1-23 15  15:1-22 15  15:23–16:9 16   16:10-27
Galatians   1   1:1-24 2    2:1-16 2    2:17–3:9 3  3:10-22 3   3:23–4:31 5 5:1-12 5    5:13-26 6   6:1-18
Ephesians   1   1:1-23 2    2:1-22 3    3:1-21 4    4:1-16 4    4:17-32 5   5:1-33 6    6:1-24
Philippians 1   1:1-26 1    1:27–2:18 2 2:19–3:4 3  3:5-21 4    4:1-23
Colossians  1   1:1-17 1    1:18–2:7 2  2:8-23 3    3:1-17 3    3:18–4:18
Titus   1   1:1-16 2    2:1-15 3    3:1-15
Philemon    1   1:1-25
Hebrews 1   1:1-14 2    2:1-18 3    3:1-19 4    4:1-16 5    5:1-14 6    6:1-20 7    7:1-17 7    7:18-28 8   8:1-13 9    9:1-10 9    9:11-28 10  10:1-17 10  10:18-39 11 11:1-16 11  11:17-31 11 11:32–12:13 12  12:14-29 13 13:1-25
James   1   1:1-18 1    1:19–2:17 2 2:18–3:18 4 4:1-17 5    5:1-20
Jude    1   1:1-25
Revelation  1   1:1-20 2    2:1-17 2    2:18–3:6 3  3:7-22 4    4:1-11 5    5:1-14 6    6:1-17 7    7:1-17 8    8:1-13 9    9:1-21 10   10:1-11 11  11:1-19 12  12:1-17 12  12:18–13:18 14  14:1-20 15  15:1-8 16   16:1-21 17  17:1-18 18  18:1-24 19  19:1-21 20  20:1-15 21  21:1-27 22  22:1-21

看来OP可能提供了测试数据已经处于正确的排序顺序。如果您需要按“章节”排序，请切换上面最后一个 Raku 语句并使用以下语句：

say ($_ => %verses{$_}.sort: *.key.Int) if %verses{$_} for @books;

注意：两个分析文件中“密钥”之间的任何不一致都将导致密钥（即书籍）从最终输出中删除。因此，请确保键（如1 John等2 John）的命名一致（而不是例如1st John等2nd John）。

https://docs.raku.org
https://raku.org

Answer