textarea 字符转换问题
将textarea的数据插入数据库再取出，本来没什么难的，可是我希望用json传递那些信息的话就会报错，因为json无法解析换行的字符，所以希望在perl上将textarea的字符中所有的换行全部转换为<br>，当然还有很多字符要转换，先做到这个程度吧。
觉得这个问题比较普遍，但网上没有查到perl的解决方法，望老鸟指点。
[解决办法]
<html><head> <title>Regular Expression</title> <meta http-equiv="Content-type" content="text/html;charset=gb2312" /> <style type="text/css"> <!-- #ShowResult{ color:#f00; font:12pt arial; } #title{ font:14pt arial,verdana,sans-serif; } --> </style> <script language="javascript"> <!-- /* // regex tester in JavaScript // Rainsome Studio // rainsome@126.com //2008-7-4 in Shanghai */ function Regex() { ///* if(document.getElementById("txtInput").value=="") { alert("请输入必要的数据。"); return; } //*/ var str1=escape(document.getElementById("txtInput").value) ; var reStr1 =/(?:%0D)?%0A/ig; var sResult=str1.replace(reStr1,"%3Cbr%20\/%3E"); sResult=unescape(sResult); alert(sResult); document.getElementById("ShowResult").innerHTML ="Result:" + sResult; return; } --> </script></head><body > <div > <div id="title" >Regular Expression</div> <hr /> <form id="frmRegex"><br /> <br /><br /> <div>To Match String:<textarea id="txtInput"></textarea></div><br /><br /> <div id="ShowResult"></div><br /><br /> <div><input type="button" onclick="javascript:Regex();" value="Click Here!"></div> </form> </div></body></html>