次のようなエントリを含むファイルがあります
ABC DEF GHI 1234<set 1 of numbers> AT <set 2 of numbers, can have decimal point>
次のコードを使用して、各行から 2 セットの数値を抽出しています。
if($_=~/ABC.*1234([0-9]+).*AT.*([0-9]+)/)
{
print $_, "\n";
print 1st number = ", $1 , "\t 2nd number = ", $2 , "\n";
}
最初の数値の正しい値を確認できますが、2 番目の値は常に 0 として表示されます。
2 番目の番号が表示されないのはなぜですか?