| 14 |
return $s; |
return $s; |
| 15 |
} # htescape |
} # htescape |
| 16 |
|
|
| 17 |
if ($path =~ m[^/([0-9a-z-]+)$]) { |
if ($path =~ m[^/(_?[0-9a-z-]+)$]) { |
| 18 |
my $name = $1; |
my $name = $1; |
| 19 |
my $file_name = $data_dir_name . $name . '.dat'; |
my $file_name = $data_dir_name . $name . '.dat'; |
| 20 |
if (-f $file_name) { |
if (-f $file_name) { |
| 78 |
<title>English-Japanese Data Files</title> |
<title>English-Japanese Data Files</title> |
| 79 |
<link rel=history href="../data/,cvslog"> |
<link rel=history href="../data/,cvslog"> |
| 80 |
<link rel=license href="#license"> |
<link rel=license href="#license"> |
| 81 |
|
<link rel=stylesheet href="/www/style/html/xhtml"> |
| 82 |
<h1>English-Japanese Data Files</h1> |
<h1>English-Japanese Data Files</h1> |
| 83 |
|
|
| 84 |
<ul>]; |
<ul>]; |
| 89 |
} |
} |
| 90 |
print q[</ul> |
print q[</ul> |
| 91 |
|
|
| 92 |
|
<section id=tools> |
| 93 |
|
<h2>Tools</h2> |
| 94 |
|
|
| 95 |
|
<ul> |
| 96 |
|
<li><a href="../words">English-Japanese word mapping table</a> |
| 97 |
|
<li id=find><a href="../find" rel=search>Find</a> |
| 98 |
|
</ul> |
| 99 |
|
</section> |
| 100 |
|
|
| 101 |
<section id=status> |
<section id=status> |
| 102 |
<h2>Status of translation</h2> |
<h2>Status of translation</h2> |
| 103 |
|
|
| 107 |
<section id=license> |
<section id=license> |
| 108 |
<h2>License of data files</h2> |
<h2>License of data files</h2> |
| 109 |
|
|
| 110 |
|
<p><strong>Texts from HTML5 and Web Workers specs</strong>: |
| 111 |
<blockquote cite="http://whatwg.org/html5"> |
<blockquote cite="http://whatwg.org/html5"> |
| 112 |
<p class=copyright>© Copyright 2004-2008 Apple Computer, Inc., |
<p class=copyright>© Copyright 2004-2008 Apple Computer, Inc., |
| 113 |
Mozilla Foundation, and Opera Software ASA.</p> |
Mozilla Foundation, and Opera Software ASA.</p> |
| 116 |
derivative works of this document.</p> |
derivative works of this document.</p> |
| 117 |
</blockquote> |
</blockquote> |
| 118 |
|
|
| 119 |
|
<p><strong>Texts from XBL 2.0 spec</strong>: |
| 120 |
|
<blockquote cite="http://www.mozilla.org/projects/xbl/xbl2.html"> |
| 121 |
|
<p class=copyright>Portions of this content are © 1998–2006 by |
| 122 |
|
individual mozilla.org contributors; content available under a Creative |
| 123 |
|
Commons license. (<a |
| 124 |
|
href="http://www.mozilla.org/foundation/licensing/website-content.html">Details</a>)</p> |
| 125 |
|
</blockquote> |
| 126 |
|
|
| 127 |
<p><strong>For contributors</strong>: You have to agree that your |
<p><strong>For contributors</strong>: You have to agree that your |
| 128 |
contributions are licensed under the terms quoted above. |
contributions are licensed under the terms quoted above. |
| 129 |
</section> |
</section> |
| 130 |
]; |
]; |
| 131 |
exit; |
exit; |
| 132 |
|
} elsif ($path eq '/para/add') { |
| 133 |
|
if ($ENV{REQUEST_METHOD} eq 'POST') { |
| 134 |
|
|
| 135 |
|
} |
| 136 |
|
|
| 137 |
|
print q[Content-Type: text/html ; charset=utf-8 |
| 138 |
|
|
| 139 |
|
<!DOCTYPE HTML> |
| 140 |
|
<html lang=en> |
| 141 |
|
<head> |
| 142 |
|
<title>Add paragraph</title> |
| 143 |
|
<link rel=stylesheet href="/www/style/html/xhtml"> |
| 144 |
|
<body> |
| 145 |
|
<h1>Add paragraph</h1> |
| 146 |
|
<form action=add accept-charset=utf-8 method=post> |
| 147 |
|
]; |
| 148 |
|
|
| 149 |
|
print q[</form>]; |
| 150 |
|
exit; |
| 151 |
} |
} |
| 152 |
|
|
| 153 |
print q[Content-Type: text/plain ; charset=us-ascii |
print q[Content-Type: text/plain ; charset=us-ascii |