ごめん、実際のコードは変数名とかまずいのがあるからコピーしたあと書き直してるうちに
間違えちゃった。
my @numbers;
my @alllog = glob("/tmp/abcde.log*");
foreach my $log (@alllog) {
　open(FH, $log);
　while ( <FH> ){
　　next if ! /number\s+=\s+(\d+)\s+id\s+=\s+7/ ;
　　push @numbers, $1 ;
　}
}
複数のログを全部チェックしようとしてこんなコードを書くと、
Use of uninitialized value in concatenation (.) or string at /tmp/number.pl line 50, <FH> line 11.
ちなみに/tmp/number.pl line 50というのは、
　next if ! /number\s+=\s+(\d+)\s+id\s+=\s+7/ ;
のところ。
どうすればこのエラーをなくせますか？