push 空内容push入数组会占位

 1 #!/usr/bin/perl
 2
 3 use strict;
 4 use warnings;
 5
 6 my $new = (0 ==1)?233:'';my @arr;
 7 my $new_1 = (1==1)?233:'';
 8 push @arr,$new_1;push @arr,$new;push @arr,'123456';
 9 my $line = join "|",@arr;
10 print $line;
11 print "\n";
12
13 #233||123456