regex - 如何用perl中的_替换字符串中的空格和制表符？

Question

$string = I am a boy

如何用下划线替换单词之间的空格？

Answer 1

您需要一个正则表达式和替换运算符来做到这一点。

my $string = 'I am a boy';
$string =~ s/\s/_/g;

您可以在perlre和perlretut中了解有关正则表达式的更多信息。一个很好的工具是Rubular。

---

此外，您的代码将无法编译。您需要引用您的字符串，并且需要在末尾放置一个分号。

Answer 2

$string = 'I am a boy';
$string =~ s/ /_/g;

Answer 3

$string =~ tr( \t)(_);  # Double underscore not necessary as per Dave's comment

Answer 4

这只是为了在 perl 中显示另一个选项。 我认为Miguel Prz并imbabque展示了更聪明的方式，我个人遵循imbabque展示的方式。

my $str = "This is a test string";
$str =~ s/\p{Space}/_/g;
print $str."\n";

输出是

This_is_a_test_string