The OpenNET Project / Index page

[ новости /+++ | форум | wiki | теги | ]

Как определить константу в Perl
use constant TEST => 1;
$a=TEST;
 
26.08.2001
Ключи: perl / Лицензия: CC-BY
Раздел:    Корень / Программисту и web-разработчику / Perl / Переменные в Perl

Обсуждение [ RSS ]
  • 1, Augusta (?), 18:23, 30/10/2003 [ответить]  
  • +/
    *MYCONST=\Значение;

    Примеры:

    *NOSQLQUERY =\ "Невозможно выполнить запрос";
    print "$NOSQLQUERY\n";

    *YEAR =\ 2003;
    print "$YEAR\n";

     

     Добавить комментарий
    Имя:
    E-Mail:
    Заголовок:
    Текст:




    Партнёры:
    PostgresPro
    Inferno Solutions
    Hosting by Hoster.ru
    Хостинг:

    Закладки на сайте
    Проследить за страницей
    Created 1996-2024 by Maxim Chirkov
    Добавить, Поддержать, Вебмастеру