定数を作るのに役立つと、どっかのサイトで見た記憶がある

*PI = \3.14;
print $PI;
$PI = 3; # エラー