【提问帖】perl出现字符叠加

level 1

⛄醋酸菌⛄ 楼主

open INFILE, "<$ARGV[0]";
my @inputlist;
while (<INFILE>) {
chomp();
my $line = $_;
print "$line\n";
push @inputlist, "$line";
}
我使用如上代码构造数组后，其中的元素在运算过程中就会发生叠加。

2022年07月08日 16点07分 1

level 1

⛄醋酸菌⛄ 楼主

例如元素“AAAAAAAA"."string"
会得到”stringAA"
如果数组是“AAAAA”,“BBB”,"C"
打印会得到” CBBA“

2022年07月08日 16点07分 2

⛄醋酸菌⛄

如果打印数组间，没有空格，就会得到”CBBAA"这种

2022年07月08日 16点07分

hwy801207

打印数组的时候，如果要空格的话比如my @nums = (1,2,3); print("@nums\n") 就可以了，需要双引号包裹起来

2023年04月01日 11点04分

level 1

⛄醋酸菌⛄ 楼主

我发现这种情况时，每次运算的结果会让后一个字符串直接从头覆盖前一个字符串，我这次的写法和运行环境和之前的都没有区别，但是出现这样的bug，很奇怪，不知道这是什么原因

2022年07月08日 16点07分 3

level 1

⛄醋酸菌⛄ 楼主

请求吧内大神指教！！！ [泪]

2022年07月08日 16点07分 4