From 1e6c7fd3007e1822d400bbb2f52e477c8b3ab818 Mon Sep 17 00:00:00 2001 From: karchnu Date: Tue, 19 Jan 2016 05:26:54 +0100 Subject: [PATCH] =?UTF-8?q?ajout=20d'info=20disponible=20=C3=A0=20partir?= =?UTF-8?q?=20de=20l'appli=20web?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- lib/MyWeb/App.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lib/MyWeb/App.pm b/lib/MyWeb/App.pm index 67f47d6..28544af 100644 --- a/lib/MyWeb/App.pm +++ b/lib/MyWeb/App.pm @@ -31,6 +31,11 @@ our $isviewtest = is_view_test(get_cfg()); our $VERSION = '0.1'; +get '/info' => sub { + my $str = "This is : " . config->{appname} . "
"; + $str .= "environment : " . config->{environment} . "
"; +}; + sub what_is_next { my ($res) = @_;