|
|
|
|
  [求助] perl中的编码转换问题！ - swjojo [ 2004-07-17 14:44 | 2,539 byte(s)]
可能的问题是#号,把它们改成""或"/"试一下,好象在日文中打不出""字. - isgod [ 2004-08-04 10:17 | 0 byte(s)]
|
|
|
|
[Original]
[Print]
[Top]
|
不知道在这里问合不合适！ 我将某个日文cgi程序中的pl内的下面这段代码的 语言编码 改变后 就出问题了。(x-sjis改成了gb2312)
原来能正常运行的页面显示出错，有2个。一个是缺少";" 一个是"找不到对象" 请问这是什么原因？
-------------------------------------------
if($_[0]==1){
print <<"EOM";
<HTML XMLNS:t="urn:schemas-microsoft-com:time"><head>
<meta http-equiv="Content-Type" content="text/html; charset=x-sjis">
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<META http-equiv="Page-Enter" content="progid:DXImageTransform.Microsoft.Pixelate(MaxSquare=10,Duration=1)">
<META http-equiv="progid:DXImageTransform.Microsoft.Pixelate(MaxSquare=10,Duration=1)">
<META http-equiv="Page-Eenter" content="revealTrans(duration=2.0,transition=12)">
<title>$title</title><link rel="stylesheet" href="style.css" type="text/css">
<?IMPORT namespace="t" implementation="#default#time2">
<SCRIPT Language="JavaScript" src="control.js"></SCRIPT>
EOM
}else{
print <<"EOM";
<HTML XMLNS:t="urn:schemas-microsoft-com:time"><head>
<meta http-equiv="Content-Type" content="text/html; charset=x-sjis">
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
<meta http-equiv="Page-Enter" content="revealTrans(Duration=4,Transition=3)">
<META http-equiv="Page-Exit" content="blendTrans(Duration=3.0)">
<title>$title</title><link rel="stylesheet" href="style.css" type="text/css">
<?IMPORT namespace="t" implementation="#default#time2">
<SCRIPT Language="JavaScript" src="control.js"></SCRIPT>
EOM
}
}
-------------------------------------------
|
|
|
[Original]
[Print]
[Top]
|
|
|
声明: 本页内容为中国Linux论坛的内容镜像，文章的版权以及其他所有的相关权利属于中国Linux论坛和相应文章的作者，如果转载，请注明文章来源及相关版权信息。