パターンマッチでの初期化されていない値の使用（m //）

Question

正規表現変数を宣言してもこのエラーが発生します。

my $pattern = '(Cat\.\sNo\.\s\d+)';

後の私のコードでは、私が$patternその後、使用しています。

if ($page =~ /$pattern/) 
{ 
    push(@array, $element); 
} 

しかし、私は自分のコードを実行すると、それは私に、以下のエラーを与え、正常に実行し続け：

Use of uninitialized value in pattern match (m//) 

このエラーのためにGoogleで検索は変数がない持っているシナリオを指すように思えます私の場合は既に初期化されているようですが、初期化されていますか？

Answer 1

$patternが初期化されていないというメッセージは表示されません。それは$pageが初期化されていないことを伝えています。あなたは$pageが初期化されていないかもしれないが、それはOKですが、その後、あなたは警告をバイパスすることができ、これを書き込むことによって、ソースコードの将来の読者のために、物事を明確にすることを期待している場合：

if (defined($page) && ($page =~ /$pattern/)) 

Answer 2

問題は」にISNトン$pattern - 問題は、簡単なテストでは、同じ結果を$element

が生成されますされています

use strict; 
use warnings; 

my $pattern = '(Cat\.\sNo\.\s\d+)'; 
my $element =~ /$pattern/;