/[suikacvs]/www/test/charset/charset-names/charset.cgi
Suika

Diff of /www/test/charset/charset-names/charset.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by wakaba, Wed Jun 4 23:59:54 2008 UTC revision 1.2 by wakaba, Thu Jun 5 15:52:09 2008 UTC
# Line 14  print "Content-Type: text/html; charset= Line 14  print "Content-Type: text/html; charset=
14  ";  ";
15    
16    
17  my $s = q[<!DOCTYPE HTML>  my $s = q[<!DOCTYPE HTML>].
18  <script charset=utf-8 src="../../../support/result0.js"></script>  ($ENV{QUERY_STRING} =~ /c1/ ? q[<meta charset=iso-8859-3>] :
19     $ENV{QUERY_STRING} =~ /c2/ ? q[<meta charset=iso-8859-4>] : q[]) .
20    q[<script charset=utf-8 src="../../../support/result0.js"></script>
21  <script charset=utf-8 src="../../../support/result.js"></script>  <script charset=utf-8 src="../../../support/result.js"></script>
22    
23  <h1>Before <code>onload</code></h1>  <h1>Before <code>onload</code></h1>

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24