Question

一位同事注意到，在创建具有特定非打印字符的文件时，perl会替换它们。在这种情况下，\ x09被替换为\ x20。

echo `perl -e 'print "\x41"x40 . "\xc4\x09\x40"'` > test.out

查看生成的文件时：

xxd test.out

你知道了：

0000000: 4141 4141 4141 4141 4141 4141 4141 4141  AAAAAAAAAAAAAAAA
0000010: 4141 4141 4141 4141 4141 4141 4141 4141  AAAAAAAAAAAAAAAA
0000020: 4141 4141 4141 4141 c420 400a            AAAAAAAA. @.

请注意，最后3个字节是\ xc4，\ x20，\ x40而不是\ xc4，\ x09，\ x40。没有人能够向我们解释这个。获取\ x09的唯一方法是使用十六进制编辑器手动编辑test.out文件。有什么想法吗？

Answer 1

那是shell做的，而不是Perl。如果引用命令替换，则将保留选项卡：

echo "$(perl -e 'print "\x41"x40 . "\xc4\x09\x40"')"  > test.out

但是我不知道你为什么要在这里涉及贝壳。最好将echo完全保留，只需将perl直接运行到文件中即可。这意味着perl输出必须包含自己的换行符，但您可以通过多种方式执行此操作：

perl -e 'print "\x41"x40 . "\xc4\x09\x40\n"' > test.out

或

perl -le 'print "\x41"x40 . "\xc4\x09\x40"' > test.out

或

perl -E 'say "\x41"x40 . "\xc4\x09\x40"' > test.out

echo用\ x20替换\ x09

1 个答案: