Создание и использование констант

Константы используются для хранения значений, которые не должны изме¬няться во время работы программы. Создать константу можно с помощью прагмы (модуля) constant:
#!/usr/bin/perl -w
# Выводим все сообщения об ошибках
# в окно Web-браузера
use CGI::Carp qw(fatalsToBrowser); print "Content-type: text/html\n\n";
# Создание константы
use constant HOST_CONNECT => 1localhost1; print HOST_CONNECT;
После объявления константы ее имя указывается в программе без знака $.