~ubuntu-branches/debian/sid/libembperl-perl/sid

« back to all changes in this revision

Viewing changes to test/html/http.htm

  • Committer: Bazaar Package Importer
  • Author(s): Angus Lees
  • Date: 2004-02-15 14:23:39 UTC
  • Revision ID: james.westby@ubuntu.com-20040215142339-n21gqf7mx9tmyb8d
Tags: upstream-2.0b10
ImportĀ upstreamĀ versionĀ 2.0b10

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
<html>
 
2
<head>
 
3
<title>Setup http header</title>
 
4
</head>
 
5
 
 
6
 
 
7
<body>
 
8
 
 
9
 
 
10
<meta http-equiv="Formatter" content="Embperl">
 
11
 
 
12
[- 
 
13
$http_headers_out{'Locationx'} = "http://www.ecos.de/embperl/" ;
 
14
$http_headers_out{'h1'} = "v0" ;
 
15
$http_headers_out{'h2'} = ['v1', 'v2'] ;
 
16
-]
 
17
 
 
18
 
 
19
[- @ks = sort keys %http_headers_out -]
 
20
<table>
 
21
        <tr>
 
22
                <td>[+ $ks[$row] +]</td><td>[+ $http_headers_out{$ks[$row]} +]</td>
 
23
        </tr>
 
24
</table>
 
25
 
 
26
 
 
27
 
 
28
</body>
 
29
</html>