0

我在从数据库导出的文本文件中有一个字段。该字段包含地址，但有时它们很长，并且数据库允许它们包含多行。导出时，换行符被替换为美元符号，如下所示：

first part of very long address$second part of very long address$third part of very long address

并非每个地址都有多行，并且没有地址包含多于三行。每行的长度是可变的。

我正在按摩数据以导入用于邮件合并的 MS Access。我想在 $ 符号上拆分字段（如果它存在）但如果该字段仅包含 1 行，我想将我的两个额外输出字段设置为零长度字符串，这样我就不会在地址中出现空行当它被打印出来时。

我有一个 awk 文件，它可以在文本文件中的所有其他数据上正常工作，但我需要让最后一点工作。我尝试了下面的代码。除了我在 else 中遇到语法错误之外，我不确定这是做我想做的事的好方法。这是在 Windows 上使用 gawk 完成的。

BEGIN { FS = "|" }
$1 != "HEADER" {
    if ($6 ~ /\$/)
        split($6, arr, "$")
        address = arr[1]
        addresstwo = arr[2]
        addressthree = arr[3]
        addressLength = length(address)
        addressTwoLength = length(addresstwo)
        addressThreeLength = length(addressthree)

    else {
        address = $6
        addressLength = length($6)
        addresstwo = ""
        addressTwoLength = length(addresstwo)
    addressthree = ""
        addressThreeLength = length(addressthree)
        }

    printf("%*s\t%*s\t\%*s\n",
          addressLength, address, addressTwoLength, addresstwo, addressThreeLength, addressthree)
}

编辑：对此感到抱歉。这是一个示例

HEADER|0000000130|0000527350|0000171250|0000058000|0000756600|0000814753|0000819455|100106
rec1|ILL/COLORADO COLLEGE$TUTT LIBRARY|1021 N CASCADE$COLORADO SPRINGS, CO 80903|
rec2|ILL /PIKES PEAK LIBRARY DISTRICT|20 N. CASCADE AVE. / PO BOX 1579$COLORADO SPRINGS, CO 80903|
rec3|DOE,JOHN|PO Box 8034|
rec4|ILL/GEORGIA INSTITUTE OF TECHNOLOGY|INFORMATION DELIVERY DEPT$704 CHERRY ST$ATLANTA, GA 30332-0900

我只匹配没有 HEADER 的行。我需要拆分 $ 符号上的文本字符串。不应填充管道之间的字符串（这就是我试图在原始代码中获取长度的原因）。对于此示例，有 6 个输出字段，任何没有数据的字段都只是一个空字符串（也是我在代码中尝试做的）。

rec1|ILL/COLORADO COLLEGE|TUTT LIBRARY|1021 N CASCADE|COLORADO SPRINGS, CO 80903||
rec2|ILL /PIKES PEAK LIBRARY DISTRICT||20 N. CASCADE AVE. / PO BOX 1579|COLORADO SPRINGS, CO 80903||
rec3|DOE,JOHN||PO Box 8034|||
rec4|ILL/GEORGIA INSTITUTE OF TECHNOLOGY||INFORMATION DELIVERY DEPT|704 CHERRY ST|ATLANTA, GA 30332-0900|

希望有帮助！如果这还不清楚，请告诉我。

4

1 回答 1

0 
BEGIN { FS = "|" }
$1 != "HEADER" {
    for(i = gsub(/\$/, "\t", $6); i < 3; i++)
        $6 = $6 "\t"
    print $6
}

不过，我不确定我是否满足您的要求。

于 2011-02-10T20:11:13.453 回答