$DT->{icon}=顔アイコンの番号;

と記述します。例えば、kao5.pngのアイコンにしたいのなら、
$DT->{icon}=5;
とかです。アイテム内でも使えると思います。

たとえば、デフォルトの顔アイコンが30までだとして、フォルダにkao99.pngを入れておいて、アイテムでのみ設定可能とすれば、ある条件を満たさないと使えない顔アイコンが設定できて楽しそうですね。

$DT->{icon}=int(rand($ICON_NUMBER))+1;
で、ランダムに顔アイコンが変わります。