Forum Webscript.Ru
Программирование => Perl => Тема начата: Yaroslav от 21 Февраля 2006, 17:43:00
-
все работает, но хочу узнать как сделать правильно что б небыло записи "Use of uninitialized value in string eq" :D
лазил, лазил везде и не нахожу такого.
собственно $kat может быть или не быть :)
if ($kat eq "pt") { $razdel="111"; }
elsif ($kat eq "dt") { $razdel="222"; }
print "$razdel";
-
if ($kat and ($kat eq "pt"))
-
else {$razdel="что-то там..";}