> どうやってtextareaの内容を$cmに代入すれば良いのかが分かりません……。
>
> と、com_afterの方を見てみたらしっかり代入してありました^^;
> 恐らくname=****と指定をすれば勝手に読み込んでくれると思い、afterの方で代入していたのがcomだったので
> name=comとし、やってみたらちゃんと反映されました。
> で、textareaの内容に今のコメント文を表示させるので内容の部分に$cmを入れて
> print qq|<textarea rows=5 cols=60　name=com>$cm</textarea>|;
>
> と言った様にしたらちゃんと作動しました。バッチリです！

改行処理を追加しましたでしょうか？
例えば改行の置換文字を:BR:とした場合は、com_beforeのほうでは表示前に、
　　($tmp = $cm) =~ /:BR:/\n/g;
を実行してprint qq|<textarea name=com rows=5 cols=60>\n$tmp</textarea>|;
com_afterではuserout前に、
　　($cm = $Fm{'com'}) =~ s/<br>/:BR:/g;

▼関連発言
│
└◆947:スキルの略字に数字 [ミル] 02/20 23:46
　└◆948:Re:スキルの略字に数字 [moon] 02/21 01:00
　　└◆949:Re[2]:スキルの略字に数字 [ミル] 02/21 11:28
　　　├◆950:Re[3]:追記 [moon] 02/21 14:46
　　　└◆951:補足の御手伝い [鴫ヒサヤ] 02/21 19:18
　　　　└◆952:Re:補足の御手伝い [ミル] 02/22 03:21
　　　　　├◆953:Re[2]:補足の御手伝い [ミル] 02/22 03:22
　　　　　│└◆954:便乗質問 [ミル] 02/22 03:27
　　　　　│　└◆955:Re:複数行テキストボックス [moon] 02/22 13:11
　　　　　│　　└◆957:Re[2]:複数行テキストボックス [ミル] 02/24 21:28
　　　　　│　　　└◆958:Re[3]:複数行テキストボックス [moon] 02/24 21:52
　　　　　│　　　　└◆959:Re[4]:補足 [moon] 02/24 22:00
　　　　　│　　　　　└◆960:Re[5]:補足 [ミル] 02/25 18:01
　　　　　│　　　　　　└◆961:Re[6]:補足 [moon] 02/25 22:16
　　　　　│　　　　　　　└◆962:Re[7]:補足 [ミル] 02/26 13:05
　　　　　│　　　　　　　　├◆963:Re[8]:補足 [moon] 02/26 18:56
　　　　　│　　　　　　　　└◆964:階層が深いのでこちらに.. [ミル] 02/27 12:39<-last
　　　　　└◆956:その通りです [鴫ヒサヤ] 02/22 18:35