Проверка существования переменной

Для проверки существования элемента в хеше существует функция exists о:
#!/usr/bin/perl -w
# Выводим все сообщения об ошибках
# в окно Web-браузера
use CGI::Carp qw(fatalsToBrowser); print "Content-type: text/html\n\n";
# Заполняем хеш значениями
%var = ("январь" => 1, "февраль" => 2); if (exists($var{"январь"})) {
print "Переменная \$var{"январь"}определена";
}
else {
print "Переменная \$var{"январь"} не определена\п";
}
print "<BR>";
if (exists($var{"март"})) {
print "Переменная \$var{"март"} определена";
}
else {
print "Переменная \$var{"март"} не определена\п";
Вывод:
Переменная $var{"январь"} определена Переменная $var{"MapT"} не определена
В первом случае ключ январь определен в хеше %var? а во втором ключа март нет в хеше %var. Более подробно хеши мы рассмотрим далее.



Страница: 1 | 2 | 3 | 4