From 904fa53a05ef9fd74713493f86d98eb5ab41d076 Mon Sep 17 00:00:00 2001
From: Hauke D <haukex@zero-g.net>
Date: Sat, 29 Sep 2018 17:23:23 +0300
Subject: [PATCH] Added xterm.js experiment

---
 experiments/xterm.html | 41 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 experiments/xterm.html
diff --git a/experiments/xterm.html b/experiments/xterm.html
new file mode 100644
index 0000000..5968f43
--- /dev/null
+++ b/experiments/xterm.html
@@ -0,0 +1,41 @@
+<!doctype html>
+<html lang="en-us">
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>WebPerl XTerm.js Test</title>
+
+<link rel="stylesheet" href="https://cdn.jsdelivr.net/npm/xterm@3.7.0/dist/xterm.css"
+	integrity="sha256-OSfRj4jMeYVFSwgcvVvKj4V0+mwqSP9YJjyEJe7dmK0=" crossorigin="anonymous" />
+<script src="https://cdn.jsdelivr.net/npm/xterm@3.7.0/dist/xterm.js"
+	integrity="sha256-gIILiZzLBFrmY1dzcKJC2Nmw4o9ISITTNsro2rf8svM=" crossorigin="anonymous"></script>
+
+<script src="webperl.js"></script>
+
+<script>
+"use strict";
+window.addEventListener('load', function () {
+	var term = new Terminal();
+	term.open(document.getElementById('terminal'));
+	Perl.output = function (str) { term.write(str) };
+	Module.preRun.push(function () { ENV.TERM = "xterm" });
+});
+</script>
+
+<script type="text/perl">
+use warnings;
+use strict;
+use Term::ANSIColor qw/colored/;
+
+print colored("Hello, Color World!\n", 'black on_yellow');
+#TODO: how to best accept input from XTerm?
+
+</script>
+
+</head>
+<body>
+
+<div id="terminal"></div>
+<p><a href="http://xtermjs.org/" target="_blank">xterm.js</a></p>
+
+</body>
+</html>
