OpenForum RSS: Раздел полезных советов: Как определить константу в Perl

OpenForum RSS: Раздел полезных советов: Как определить константу в Perl https://www.opennet.ru/openforum/vsluhforumID3/2739.html use constant TEST => 1;<br>$a=TEST;<br><br>URL: <br>Обсуждается: http://www.opennet.ru/tips/info/9.shtml<br><br> Как определить константу в Perl (Augusta) https://www.opennet.ru/openforum/vsluhforumID3/2739.html#1 Thu, 30 Oct 2003 15:23:07 GMT *MYCONST=\Значение;<br><br>Примеры:<br><br>*NOSQLQUERY =\ "Невозможно выполнить запрос";<br>print "$NOSQLQUERY\n";<br><br>*YEAR =\ 2003; <br>print "$YEAR\n";<br><br>