summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--bin/app.pl6
-rw-r--r--index.html5
2 files changed, 10 insertions, 1 deletions
diff --git a/bin/app.pl b/bin/app.pl
index 8556038..b18b726 100644
--- a/bin/app.pl
+++ b/bin/app.pl
@@ -1,5 +1,5 @@
#!/usr/bin/env perl
-use Dancer2;
+use Dancer;
use Data::Dumper;
set public => './';
@@ -8,6 +8,10 @@ get '/download/*.*' => sub {
# do something with $file.$ext here
};
+get '/' => sub {
+ send_file "./index.html";
+};
+
get qr{/img/([\w\.\-_]+)} => sub {
my ($filename) = splat;
send_file sprintf("/img/%s", $filename);
diff --git a/index.html b/index.html
new file mode 100644
index 0000000..db0bd14
--- /dev/null
+++ b/index.html
@@ -0,0 +1,5 @@
+<html>
+<body>
+hey hey hey
+</body>
+</html>