改行<br>を<br />に変える方法

テキストエリアで改行した際に以下のコードですと改行は<br>になります。
これを<br />に変更したいのですが、自分なりに試してみたのですが全くうまくいきません。

sub decode {
&ReadParse;
while (($key,$val) = each %in) {
if ($key !~ /upfile/ ) {
&Jcode'convert(*val, "utf8", "", "z");
if ( $key !~ /label_name/ ) {
$val =~ s/</&lt;/g;
$val =~ s/>/&gt;/g;
}
$val =~ s/\r\n/<br>/g; $val =~ s/\r|\n/<br>/g;
}
$in{"$key"} = "$val";
}

どなたか<br />に変更する記述を教えて頂けませんでしょうか？

No.1 回答者： play_with_you 回答日時： 2013/10/18 18:06

「<br>」を「「<br />」にするだけです。

この回答への補足

＞「<br>」を「「<br />」にするだけです。
この方法ではエラーになってしまいます。

補足日時：2013/10/18 18:15

この回答へのお礼

ありがとうございました。

お礼日時：2013/10/18 19:05