perl 怎么判断数组元素只为空格

2024年11月16日 21:51

有3个网友回答

网友（1）：

@a=qw(a b c d);
空格隔开陆橡的就是每个元哗饥素
当然你可以指定早芦旁分隔符：
$a="a,b,c,d";
@a=split/,/$a;

网友（2）：

你说的是某个数组的元素是否为空格，即‘ ’，中间有个空格，用罩判粗判冲败断语句$table[$i] eq ' ' 就可以达到目的物镇。

网友（3）：

my $strsplit =" ";
my @arraylist = (" "," s ","灶轮数 ");
my $tflag=undef;
foreach (@arraylist) {
if(/[^" "]/隐首) {
$tflag = "桐中1";
}
}
if (defined ( $tflag)) {
print "非空格\n";
}else {
print "记着给分啊\n";
}

perl 怎么判断数组元素 只为空格

perl 怎么判断数组元素只为空格