>>196の本人です。みなさん、ご意見ありがとうございます！
ぴんとこなかったのですが…
「変数でやってる」ていうのが印象にのこりました。
そのために、名前空間を利用しようとおもいます。
かきかえられたくないんじゃなくて、〝定数〟をまとめてかいておきたいんです。
（何回も何回もおなじ計算をやりたくないとか…）

Readonly module
constantを実現するモジュール
サブルーチンを定数の代用にする
変数でやってる
一括で置換

use strict;

sub CONST { return 9 }

my $s = CONST;
print $s, "\n";