2010-10-14 81 views

Trả lời

17

Chỉ cần sử dụng các nhà điều hành s/// thay:

$string =~ s/\s+//g; 

Các \scharacter class phù hợp với một ký tự khoảng trắng, tập [\ \t\r\n\f] và những người khác.

0
while (<>) { s/\s+//g; print; } 

?

+0

Bạn có thể thả 'chomp;'. – codaddict

Các vấn đề liên quan