如何在Perl中将字符串添加到字符串？

Question

我想在perl中创建具有长度的字符串,例如7,但是"可见"内容,例如"a".

我的$ test = ...;

print $ test result:"a"打印长度($ test)结果:7

Answer 1

您将空字符添加到字符串.为什么你想要这个超出我,但你如何做到这一点如下所示.

{ow-loopkin:tmp:->perl
$string = "e\0\0\0\0";
print length $string;
[ctrl+d]
5
{ow-loopkin:tmp:->

你也可以使用pack()来填充空值:

ow-loopkin:tmp:->perl
$string = pack("Z6", 42);
print length $string;
[ctrl+d]
6
{ow-loopkin:tmp:->