undef, $event, $r->get_server_name)
or error($r, "Could not find event $event", 404, "File not found");
my $name = $ref->{'name'};
my $date = $ref->{'date'};
undef, $event, $r->get_server_name)
or error($r, "Could not find event $event", 404, "File not found");
my $name = $ref->{'name'};
my $date = $ref->{'date'};