From d3e7b5708deffbed864c916de22663f48333c58b Mon Sep 17 00:00:00 2001
From: yo mama <pepper@scannerjammer.com>
Date: Tue, 22 Sep 2015 00:51:40 -0700
Subject: finishing server

---
 frontend/impattern/app.pl | 34 ----------------------------------
 1 file changed, 34 deletions(-)
 delete mode 100644 frontend/impattern/app.pl

(limited to 'frontend/impattern/app.pl')

diff --git a/frontend/impattern/app.pl b/frontend/impattern/app.pl
deleted file mode 100644
index b1bfc3c..0000000
--- a/frontend/impattern/app.pl
+++ /dev/null
@@ -1,34 +0,0 @@
-#!/usr/bin/env perl
-use Dancer2;
-use Data::Dumper;
-set public => './';
-
-get '/download/*.*' => sub {
-       my ($file, $ext) = splat;
-       # do something with $file.$ext here
-};
-
-get qr{/img/([\w\.\-_]+)} => sub {
-     my ($filename) = splat;
-     send_file sprintf("/img/%s", $filename);
-};
-get qr{/patterns/([\w\.\-_]+)} => sub {
-     my ($filename) = splat;
-     send_file sprintf("/patterns/%s", $filename);
-};
-get qr{/css/([\w\.\-_]+)} => sub {
-     my ($filename) = splat;
-     send_file sprintf("/css/%s", $filename);
-};
-get qr{/js/([\w\.\-_]+)} => sub {
-     my ($filename) = splat;
-     send_file sprintf("/js/%s", $filename);
-};
-get qr{/fonts/([\w\.\-_]+)} => sub {
-     my ($filename) = splat;
-     send_file sprintf("/fonts/%s", $filename);
-};
-get '/' => sub {
-  send_file ("index.html");
-};
-dance;
-- 
cgit v1.2.3-70-g09d2