perl 文字列内の空白数を数えるにはどうすればよいですか?

Perlでは正規表現と組込み関数を使って文字列内の空白を数えます。

正規表現で空白をマッチし、マッチ結果を配列コンテキストで配列に格納して、最後に配列の長さを返す。

use strict;
use warnings;
my $str = "Hello world!";
my @spaces = $str =~ /\s/g;
my $count = scalar @spaces;
print "空格数量：$count\n";

方法2: ビルトイン関数trを使用して、文字列内の特定文字数を数える。ここでは、特定文字は空白とする。

use strict;
use warnings;
my $str = "Hello world!";
my $count = $str =~ tr/ //;
print "空格数量：$count\n";

正規表現でもtr関数でも文字列のスペース数は取得できます。