Considerations¶

a2p 不能翻译得像人一样好，但是通常都做得很好。 在生成的perl脚本中，你应当检查和修改一些东西。这里是 其中的一些，没有顺序。

awk 中有一个习惯，就是将一个字符串表达式放在 int() 函数中 来使它强制解释为数字，即使参数已经是一个数字。 这在perl 中是不必要的，但是a2p不知道参数是不是一个数字，所以它 将它直译了。你也许想删掉它。

perl 中数字比较和字符比较是不一样的。对这两种情况，awk只有一个操作符， 但是会在运行时判断是哪一种。在这一点上a2p不对awk进行彻底的模拟。 它会猜测哪一种是你想要的。大多数时候它是对的，但是不能保证。 这样的猜测都以 ""#???"" 注释来标记。你应当 仔细检查它们，至少用perl的 -w 选项来运行它们一次，这样 perl会警告你在应当使用eq 的地方使用了＝＝。

perl 不会像awk一样将不存在的数组元素创建为引用。如果你想用这种办法 来在一个for...in 循环中创建空元素，在perl中将不可能实现。

如果a2p产生了一个分段的行，用来将一列变量赋值，看上去就 像这样 (Fld1, Fld2, Fld3...) ，你应当重新用上面提到的 -n 选项 运行a2p。这样可以让你命名字段。 如果它又将行分解为一个数组，那么这个脚本中其他地方可能引用了字段的数量。

awk中的exit语句不会退出。如果有 END 段，它会转到那里。 在 END 段中执行跳过其他程序，转向退出的awk脚本段落在perl 中没有必要。你只要删掉 END 块中的条件变量，直接退出就可以了。

perl 中有两种数组，数字下标的和关联数组。perl中的关联数组叫做 散列 "hashes"。awk中的数组总是翻译为散列，但是如果你知道 索引总是数字，你就可以将 {...} 转为 [...]。对散列的遍历用到了 keys() 函数，但是对数组的散列不会。你需要修改对这样的数组进行遍历 的循环。

awk 默认 OFMT 的值是 %.6g，perl默认作用相同的成分 $# 的值是 %.20g。如果你想使用 OFMT 的默认值，你需要 显式地定义$#。

在循环顶部总是会出现分支操作，这是awk脚本中暗含的。很多时候 你可以将对整个记录的判断移到循环下面，这样可以减少很多分支判断。

出于美学原因，你也许想将数组的起始值 $[ 从1转为perl默认的0 但是要记住将所有数组的下标 AND 和 substr() 还有 index() 函数都进行更改，保证正确。

a2p会聪明地在在未处理的脚本中添加注释 "# Here is a workaround because awk is dumb"

awk脚本经常使用在shell脚本中，通过管道接受和输出文本。 大部分时候这种shell脚本"wrapper"可以和perl合并， 因为perl可以建立输入输出管道，做其他awk不能做的事情。

对RSTART 和 RLENGTH 变量进行引用的脚本可以简单地 修改为对变量$`, $& 和 $´ 的引用，只要他们是在模式匹配的范围之内。

产生的perl脚本可能含有子程序来处理awk的getline和print函数。由于 a2p通常将正确性放在首位而不是效率，一般可以将子程序重写得更有效率。

为了提高效率，你可以将子程序中的return去掉，只要返回值是子程序中的 最后一个语句。a2p可以处理最简单的情况，但是不能分析嵌入程序块的情况。

ARGV[0] 翻译为 $ARGV0， 但是 ARGV[n] 会翻译为 $ARGV[$n]。 遍历 ARGV[0] 的循环将找不到它。