くだらない質問かもしれませんが、
変数名とかハッシュ名を変数で与えることって出来るんでしょうか?

for($i=0;$i<=$#avs;$i++) {
if ($avs[$i] =~ /^###(.+)_PROCESSING$/) {
$process_id = $1;
$process_id2 = "\L$process_id\E";
$avs[$i] = "${$process_id}{${$process_id2}}\n";
}
}

みたいな感じで、

###DEDOT_PROCESSING っていう行を、

$DEDOT{$dedot} で置き換えたいんですが、うまくいかないです。
何か根本的に勘違いしてますでしょうか?
jperl 5.005 です。