perl 怎么去掉字符串中间的空格？？

2025-05-14 02:46:16

推荐回答（2个）

回答1：

原版：
#!/usr/bin/perl
$str = "my name = kitty";
$str =~ s/桐昌\s//g; #-----全局替换空格为空
print $str;
结果：带差myname=kitty

改进版：
#!/usr/bin/perl
$str = "my name = kitty";
$str =~ s/局行扒\s\s+//g; #-----全局替换2个以上的空格为空
print $str;
结果：my name=kitty

回答2：

$str = "my name = kitty";
$str =~ s/\s+//g;
只不过这样结果是拿贺：myname=kitty
要想是my name=kitty的话有点消陆派麻悉滚烦，