perl/grep-P正则提取kubectl Pod块失效问题及多块提取方案

问题1 单块提取失败原因与修复方法 #

原有命令失效的核心原因有两个：

• Perl默认使用-l参数时是逐行读取输入、逐行执行正则匹配，而你写的正则需要匹配跨多行的文本块，逐行处理时永远不可能命中跨多行的规则，这也是regex101验证正常但命令行执行失败的根本原因——regex101是把你粘贴的全部内容作为单个字符串做匹配，和逐行处理的逻辑完全不同。
• 正则中(.*)是贪婪匹配模式，遇到多块场景时会一次性吞掉两个块中间的所有内容，只会返回最后一个匹配结果，无法适配多块提取需求。

单块场景下提取Pod列表的可用命令如下：

kubectl describe node | perl -0777 -ne '/(?s)Non-terminated Pods:.*?in total.\R(.*?)(?=Allocated resources)/; print $1'

参数说明：

• -0777：告知Perl将整个输入流读取为单个字符串，支持跨行正则匹配
• 将捕获组的.*改为.*?非贪婪匹配，确保匹配范围不会超出当前Pod块边界
• 移除了冗余的/m修饰符，该修饰符仅改变^和$的行匹配逻辑，当前场景不需要。

执行后输出内容正好是Non-terminated Pods统计行之后、Allocated resources行之前的表头+所有Pod行信息，和预期结果一致。

问题2 多块场景提取所有Pod详情 #

如果输入存在多组Non-terminated Pods到Allocated resources的文本块，使用全局匹配循环输出所有捕获结果即可，命令如下：

kubectl describe node | perl -0777 -ne 'print "$1\n" while /(?s)Non-terminated Pods:.*?in total.\R(.*?)(?=Allocated resources)/g'

• 增加/g全局匹配修饰符，会自动遍历输入中所有符合规则的文本块
• 循环输出每个块捕获到的Pod列表内容，不同块之间自动用空行分隔

如果需要给不同块加明确分隔符，可以调整为如下形式：

kubectl describe node | perl -0777 -ne 'chomp($1), print "$1\n---\n" while /(?s)Non-terminated Pods:.*?in total.\R(.*?)(?=Allocated resources)/g'

其中chomp($1)用于去掉捕获内容末尾多余的换行，---是块间分隔符，可按需替换或删除。

如果要使用grep -P实现，需要加-z参数让grep一次性读取全量输入，但grep无法方便地跳过Non-terminated Pods统计行、仅输出捕获组内容，复杂场景下优先使用上述Perl方案兼容性更好。

内容的提问来源于stack exchange，提问作者monk