Perl编程几点注意

• 写文件注意不要误用 printf
• 禁止“贪婪模式”

msgid "<image id=/"img_id3154942/" src=/"res/helpimg/names_as_addressing.png/" width=/"4.1291in/" height=/"1.6709in/" localize=/"true/"><alt id=/"alt_id3154942/">Example spreadsheet</alt></image>"

想将上句中每个标签元素分离出来，参照网上介绍不使用“贪婪模式”，(.*?)，却不起作用，去掉了()，反而成功，不知为何，如下：

foreach my $tag_s ($line =~ /<[a-z]* .*?>/g) { … }

• 替换中的转义

被替换的字符串中如果有反斜线/，需要再加反斜线转义，如下：

$tag_d =~ s/g;

$msgstr =~ s/$tag_d/$tag_s/;