>>405-407
おまえらハッシュの存在忘れてね? e なくてもできるほうがいいと思うんだが。

%colors = (1 => 'あか', ・・・);
$hoge = s/([1-3])/$colors{$1}/g;