fix EOF detection of incoming nodes
[spider.git] / perl / mojonode.pl
diff --git a/perl/mojonode.pl b/perl/mojonode.pl
new file mode 100755 (executable)
index 0000000..12c9439
--- /dev/null
@@ -0,0 +1,63 @@
+#!/usr/bin/env perl
+use Mojolicious::Lite;
+
+# Documentation browser under "/perldoc"
+plugin 'PODRenderer';
+plugin 'DefaultHelpers';
+
+app->secrets(['A:new.&.S3cure!passw0rd?']);
+app->sessions->cookie_name('DXSpider');
+
+get '/' => sub {
+       my $self = shift;
+       $self->render('index');
+};
+
+
+# Not found (404)
+get '/missing' => sub { shift->render('does_not_exist') };
+
+# Exception (500)
+get '/dies' => sub { die 'Intentional error' };
+
+app->start;
+
+
+__DATA__
+
+@@ index.html.ep
+% layout 'default';
+% title 'Welcome';
+Welcome to the Mojolicious real-time web framework!
+
+@@ layouts/default.html.ep
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8">
+    <meta http-equiv="X-UA-Compatible" content="IE=edge">
+    <meta name="viewport" content="width=device-width, initial-scale=1">
+    <title><%= title %></title>
+
+    <!-- Bootstrap -->
+    <link href="css/bootstrap.min.css" rel="stylesheet">
+
+    <!-- HTML5 Shim and Respond.js IE8 support of HTML5 elements and media queries -->
+    <!-- WARNING: Respond.js doesnt work if you view the page via file:// -->
+    <!--[if lt IE 9]>
+      <script src="https://oss.maxcdn.com/libs/html5shiv/3.7.0/html5shiv.js"></script>
+      <script src="https://oss.maxcdn.com/libs/respond.js/1.4.2/respond.min.js"></script>
+    <![endif]-->
+  </head>
+  <body>
+    <h1><%= title %></h1>
+
+    <%= content %>
+
+    <!-- jQuery (necessary for Bootstraps JavaScript plugins) -->
+    <script src="js/jquery-1.11.1.min.js"></script>
+    <!-- Include all compiled plugins (below), or include individual files as needed -->
+    <script src="js/bootstrap.min.js"></script>
+  </body>
+</html>
+