html/head/head-by-script-and-parser-3.html.cgi

#!/usr/bin/perl
use strict;
use warnings;

$| = 1;

# 0s

sleep 2;

# 2s
print qq[Content-Type: text/html; charset=utf-8\n\n];

sleep 2;

# 4s
print q[  ];

sleep 2;

# 6s
print q[<!DOCTYPE HTML>];

sleep 2;

# 8s
print q[<html style="border: blue 0.5em solid; padding: 0.5em; cursor: pointer"
    onclick="
      var head = document.createElement ('head');
      head.setAttribute ('style', 'border: orange 0.5em solid; padding: 0.5em; display: block; margin: 0.5em');
      head.setAttribute ('data-source', 'html/\@onclick');
      document.documentElement.appendChild (head);
    ">];

sleep 2;

# 10s
print qq[<head data-source="html/head" style="border: blue 0.5em solid; padding: 0.5em; display: block; margin: 0.5em">];

sleep 2;

# 12s
print q[<body style="border: blue 0.5em solid; padding: 0.5em; margin: 0.5em">];

sleep 2;

# 14s
print q[<p><a href="javascript:alert (document.innerHTML || document.documentElement.outerHTML || document.documentElement.innerHTML)">Check DOM of this page!</a>];

print q[<p>] . rand;
1	#!/usr/bin/perl
2	use strict;
3	use warnings;
4
5	$\| = 1;
6
7	# 0s
8
9	sleep 2;
10
11	# 2s
12	print qq[Content-Type: text/html; charset=utf-8\n\n];
13
14	sleep 2;
15
16	# 4s
17	print q[ ];
18
19	sleep 2;
20
21	# 6s
22	print q[<!DOCTYPE HTML>];
23
24	sleep 2;
25
26	# 8s
27	print q[<html style="border: blue 0.5em solid; padding: 0.5em; cursor: pointer"
28	onclick="
29	var head = document.createElement ('head');
30	head.setAttribute ('style', 'border: orange 0.5em solid; padding: 0.5em; display: block; margin: 0.5em');
31	head.setAttribute ('data-source', 'html/\@onclick');
32	document.documentElement.appendChild (head);
33	">];
34
35	sleep 2;
36
37	# 10s
38	print qq[<head data-source="html/head" style="border: blue 0.5em solid; padding: 0.5em; display: block; margin: 0.5em">];
39
40	sleep 2;
41
42	# 12s
43	print q[<body style="border: blue 0.5em solid; padding: 0.5em; margin: 0.5em">];
44
45	sleep 2;
46
47	# 14s
48	print q[<p><a href="javascript:alert (document.innerHTML \|\| document.documentElement.outerHTML \|\| document.documentElement.innerHTML)">Check DOM of this page!</a>];
49
50	print q[<p>] . rand;