Perlで正規表現を扱う方法は何ですか?
Perlでは、文字列のマッチングや置換操作を正規表現を使って行うことができます。以下は基本的な正規表現操作の例です:
- マッチング文字列:
my $str = "Hello, World!";
if ($str =~ /Hello/) {
print "String contains 'Hello'\n";
}
- 文字列の置換:
my $str = "Hello, World!";
$str =~ s/Hello/Hi/;
print "$str\n"; # 输出 "Hi, World!"
- 該コンテンツに一致する部分を取得する。
my $str = "The price is $100";
if ($str =~ /(\$\d+)/) {
my $price = $1;
print "Price: $price\n"; # 输出 "Price: $100"
}
- 正規表現を使用して繰り返しマッチングを行う:
my $str = "apple,banana,orange";
while ($str =~ /(\w+)/g) {
print "$1\n";
}
実際のアプリケーションには、具体的な要件に応じて正規表現を柔軟に使用して文字列を処理することができます。