File: template.tx

package info (click to toggle)
libcaptcha-recaptcha-v3-perl 0.06-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 156 kB
  • sloc: perl: 167; makefile: 2
file content (33 lines) | stat: -rw-r--r-- 716 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="utf-8" />
    <meta name="viewport" content="width=device-width, initial-scale=1" />
    <meta http-equiv="X-UA-Compatible" content="IE=edge" />
    <title>reCAPTCHA v3 example</title>
    <: $script4head | mark_raw :>
</head>

<body>
<form action="/verify" method="POST">
        <: $input4form | mark_raw :>
        <button type="submit">submit</button>
</form>

: if $param.keys() {
<dl>
:   for $param.keys() -> $key {
    <dt><: $key~':' :></dt>
    <dd><: $param[$key] :></dd>
:   }
</dl>
: }
: if $response.keys() {
<dl>
:   for $response.keys() -> $key {
    <dt><: $key~':' :></dt>
    <dd><: $response[$key] :></dd>
:   }
</dl>
: }
</body></html>