regex - Perl のコンテキストでの一致

Question

テキスト ファイルで単語を検索し、いくつかの文字と共に変数に保存したいと考えています。たとえば、テキスト ファイルでは次のようになります。

等電点 = 6.2505

ファイルのディレクトリをループするので、等電点の値が変化します。そのため、一致後の文字を変数に保存する必要があります。

Answer 1

if (my ($point) = $str =~ /Isoelectric Point = (\S+)/) {
    ...
}