ChCh/interfug15_github
11
0
Fork 0
mirror of https://github.com/ChaosChemnitz/interfug15 synced 2025-06-28 13:36:07 +02:00
Code Issues Releases Wiki Activity

Nur noch ein Handler für alle

Browse source
This commit is contained in:
Moritz Grosch 2015-06-22 13:42:53 +02:00
parent 1d19edc231
commit 67733986a2
1 changed files with 23 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

42
lib/ChaosChemnitz/Interfug15/Webseite.pm
View file

@ -4,31 +4,35 @@ use Dancer2;
our $VERSION = '0.1';
our $PAGES = [
{ url => '/', name => 'Startseite' },
{ url => '/anreise', name => 'Anreise' },
{ url => '/cfp', name => 'Call for Papers' },
{ url => '/kontakt', name => 'Kontakt' },
{ url => '/tickets', name => 'Tickets' },
{url => '/', name => 'Startseite'},
{url => '/anreise', name => 'Anreise'},
{url => '/cfp', name => 'Call for Papers'},
{url => '/kontakt', name => 'Kontakt'},
{url => '/tickets', name => 'Tickets'},
];
get '/' => sub {
template 'home', { pages => $PAGES };
};
get qr/.*/ => sub {
my $site = request->path;
my $found = 0;
get '/anreise' => sub {
template 'anreise', { pages => $PAGES };
};
for my $page (@$PAGES) {
if ($page->{url} eq "$site") {
$found = 1;
last;
}
}
get '/cfp' => sub {
template 'cfp', { pages => $PAGES };
};
if (!$found) {
send_error "Not found", 404;
}
get '/kontakt' => sub {
template 'kontakt', { pages => $PAGES };
};
$site = unpack "xA*", $site;
get '/tickets' => sub {
template 'tickets', { pages => $PAGES };
if ($site eq '') {
$site = 'home';
}
template $site, {pages => $PAGES};
};
true;