Поиск строки в массиве.

Здравсвуйте. Я новичёк в Perl. И не могу разобраться.
Итак. Есть массив с html кодом @data
Мне надо сделать условие, что если в html коде, который хранится в массиве @data отсутсвует текст "Warning"
то выполняется некотрое условие. Вот как я делаю.

@data = GetRequest($url); # моя функция получения html страницы
if( !@data =~ m/Warning/ )
{
    print 'Текст Warning отсутсвует!';
}

Но ничё не работает. Помогите плиз. с меня +

Сообщение отредактировано: _SEREGA_ - 29.03.11, 08:34

if( !@data =~ s/Warning/ )

Цитата Nadz Goldman @ 29.03.11, 08:55

if( !@data =~ s/Warning/ )

Когда поставил модификатор s вместо m, скрипт выплюнул кучу ошибок((

Не, ну может я дурак, но как бы по элементам массива разве бегать не надо?

В массиве то что хранится?

Чё-та-ката-так:

foreach my $sVal ( @data ){
 print "Warning here!" if ( $sVal eq "Warning" );
}