Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > Убрать сообщение

Автор: NZero 25.9.2013, 11:07

Подскажите, как можно убрать сообщения
Use of uninitialized value $tt
Вот код в котором в котором возникает сообщение

Код


for($n=0; $n<len; $n++)
{
     $tmp[$n] =~ /[A-Za-z]>(.*)?<\/[A-Za-z]/i;
     my $tt = $1;
     if($tt =~ /[A-Za-z]/)
     {
         $tmp[$n] = ~ /<(.*)?>[A-Za-z]/i;
         push @fields_text, $1;
      }
}

Вроде бы все объявлено, но выполнении скрипта выдает сообщение. Спасибо.

Автор: infarch 25.9.2013, 11:27

Может быть, if($tt && $tt =~ /[A-Za-z]/) ?

Автор: NZero 25.9.2013, 11:40

Спасибо. Помогло)