> > my $value = "aa\nbb\n\n\n\n";
> > $value =~ s/\n/\r\n/g;
> > my @lines = split(/\n/,$value);
> > my $tmp;
> > foreach $tmp (@lines){
> > 	$tmp =~ s/\r//g;
> > 	print "'$tmp'<br>";
> > }
> > こんな感じ\rの部分はなんでも良い
> ありがとうありがとう(;´Д`)参考にさせてもらうよ

cgiで試してたから<br>のままだった(;´Д`)
\rじゃなくて\r\rとかだと普通はないかな？

参考：2007/02/07(水)03時47分33秒