型グロブを利用して定数を宣言しようと思ったのですが、
use strictを使っているとエラーになってしまいます。

*MAX = \100;
print $MAX."\n";

はOKだけど、

use strict
*MAX = \100;
print $MAX."\n";

はエラーになるということです。

型グロブを使う前に
my $MAX
を入れるとエラーは出なくなりますが、数値は未定義のままになっています。
なぜなのでしょうか？
関数を使うなど、他の方法にするしかないですか？