我有以下代码
my $string = "My mother-in-law lives in Europe";
my @words = split(/(-)|\s+/, $string);
我希望结果像My
, mother
, -
, in
, -
, law
, lives
, in
, Europe
, 但我收到了这个错误
Use of uninitialized value $_ in string
,当我尝试使用 foreach 打印数组时。
现在,我正在打印
foreach (@words)
{
print "$_" , "\n" if $_;
}
通过修改拆分语句本身是否有更好的解决方案?