Moving to mojolite and proxying it

2025-06-07 14:17:26 -04:00 · 2016-06-16 00:25:20 -04:00 · 2016-06-16 00:25:20 -04:00 · 0a5701c5fb
commit 0a5701c5fb
parent 346392842e
2 changed files with 121 additions and 0 deletions
--- a/app.pl
+++ b/app.pl
@ -0,0 +1,121 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+use FindBin qw($Bin);
+use lib "$Bin/lib";
+use Data::Dumper;
+
+use Mojolicious::Lite;
+
+get '/' => sub {
+    my $c    = shift;
+    $c->render(text => "Make a new paste");
+};
+
+get '/pastebin' => sub {
+    my $c = shift;
+    $c->redirect_to('/');
+};
+
+get '/pastebin/:pasteid' => sub {
+    my $c = shift;
+    my $pasteid = $c->param('pasteid');
+    $c->stash({pasteid => $pasteid});
+
+    $c->render(template => "editor");
+};
+
+app->start;
+
+__DATA__
+
+@@ editor.html.ep
+
+<!DOCTYPE html>
+<html lang="en">
+<head>
+  <meta charset="UTF-8">
+  <meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1">
+  <script src="https://code.jquery.com/jquery-3.0.0.min.js" ></script>
+
+  <!-- Latest compiled and minified CSS -->
+  <link rel="stylesheet" href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/css/bootstrap.min.css" integrity="sha384-1q8mTJOASx8j1Au+a5WDVnPi2lkFfwwEAa8hDDdjZlpLegxhjVME1fgjWPGmkzs7" crossorigin="anonymous">
+  <!-- Optional theme -->
+  <link rel="stylesheet" href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/css/bootstrap-theme.min.css" integrity="sha384-fLW2N01lMqjakBkx3l/M9EahuwpSfeNvV63J5ezn3uZzapT0u7EYsXMjQV+0En5r" crossorigin="anonymous">
+  <!-- Latest compiled and minified JavaScript -->
+  <script src="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.6/js/bootstrap.min.js" integrity="sha384-0mSbJDEHialfmuBBQP6A4Qrprq5OVfW37PRR3j5ELqxss1yVqOtnepnHVP9aJ7xS" crossorigin="anonymous"></script>
+
+
+  <title>Editor</title>
+  <style type="text/css" media="screen">
+    #editor {
+      margin: auto;
+      position: relative !important;
+      width: 100%;
+      height: 500px;
+      display: none;
+    }
+
+
+    #pastebin {
+      font-family: 'mono'
+    }
+
+    html, body, #content {
+      width: 100%;
+    }
+  </style>
+</head>
+<body>
+
+<div id="content" class="container">
+  <div class="panel">
+    <div class="panel-heading">
+      <h3 class="panel-title">Editor</h3>
+      </div>
+  </div>
+  <div class="panel-body">
+    <div class="editors">
+    <textarea name="pastebin" id="pastebin" cols="80" rows="25">
+use strict;
+use warnings;
+
+use Data::Dumper;
+use v5.24;
+
+say "Hello Perlbot";
+    </textarea>
+    <pre id="editor">
+    </pre>
+    </div>
+    <div class="panel-footer">
+      Footer <button value="Submit">Submit</button> <!-- todo make this a submit, and handle the form in javascript -->
+    </div>
+  </div>
+</div>
+
+<script src="extern/ace-builds/src-noconflict/ace.js" type="text/javascript" charset="utf-8"></script>
+<script>
+    $("#pastebin").hide();
+    $("#editor").show();
+    $("#editor").text($("#pastebin").text());
+    var editor = ace.edit("editor");
+    //editor.setTheme("ace/theme/twilight");
+    editor.session.setMode("ace/mode/perl");
+
+    function resizeAce() {
+      var h = window.innerHeight;
+      if (h > 360) {
+        $('#editor').css('height', (h - 290).toString() + 'px');
+      }
+    };
+    $(window).on('resize', function () {
+      resizeAce();
+    });
+    resizeAce();
+
+</script>
+
+</body>
+</html>
--- a/static/index.html
+++ b/static/index.html