COBOL中如何提取字符串内的实际变量并计算其长度？

核心逻辑是提取字符串中的目标子串（内部变量）并计算长度，可根据字符串的结构规则选择以下两种通用方案：

1. 固定分隔符拆分 #

如果内部变量始终跟在某个固定分隔符（比如你例子中的-）之后，直接用字符串拆分操作即可，适配数值型、字母数值型的内部变量：

Python 示例 #

# 示例字符串
target_str = "MYVAR-1"
# 按分隔符拆分，取最后一段作为内部变量
internal_var = target_str.split("-")[-1]
# 计算长度
var_length = len(internal_var)

print(f"内部变量：{internal_var}，长度：{var_length}")

JavaScript 示例 #

// 示例字符串
const targetStr = "MYVAR-1";
// 拆分后取最后一项
const internalVar = targetStr.split("-").pop();
// 计算长度
const varLength = internalVar.length;

console.log(`内部变量：${internalVar}，长度：${varLength}`);

这种方式简单高效，适合分隔符固定的场景。

2. 正则表达式匹配 #

如果字符串结构不固定（比如分隔符不唯一、前缀格式多变），用正则表达式匹配字母数字组合的子串，灵活性更强：

Python 示例 #

import re

# 示例字符串（字母数值型内部变量）
target_str = "MYVAR-abc123XYZ"
# 匹配末尾的所有字母数字字符
match_result = re.search(r"([a-zA-Z0-9]+)$", target_str)

if match_result:
    internal_var = match_result.group(1)
    var_length = len(internal_var)
    print(f"内部变量：{internal_var}，长度：{var_length}")

JavaScript 示例 #

// 示例字符串（字母数值型内部变量）
const targetStr = "MYVAR-abc123XYZ";
// 匹配末尾的字母数字组合
const matchResult = targetStr.match(/([a-zA-Z0-9]+)$/);

if (matchResult) {
    const internalVar = matchResult[1];
    const varLength = internalVar.length;
    console.log(`内部变量：${internalVar}，长度：${varLength}`);
}

如果内部变量是跟在固定前缀之后（比如固定前缀MYVAR-），可以调整正则规则精准匹配：

# 匹配"MYVAR-"之后的所有内容
match_result = re.search(r"MYVAR-(.*)", target_str)

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