Acme-CPANModulesBundle-Import-MojoliciousAdvent-2017
view release on metacpan or search on metacpan
devdata/https_mojolicious.io_blog_2017_12_10_day-10-give-the-customer-what-they-want view on Meta::CPAN
218219220221222223224225226227228229230231232233234235236237238
name =
>
; &
#39;<span class="hljs-string">Rudolph</span>',
description =
>
; &
#39;<span class="hljs-string">has a very shiny nose</span>',
},
);
<span class=
"hljs-keyword"
>
return
</span> <span class=
"hljs-type"
>
$reindeer
</span>{<span class=
"hljs-type"
>
$name
</span>};
};
get &
#39;<span class="hljs-string">/:name</span>' => <span class="hljs-keyword">sub </span>{
<span class=
"hljs-keyword"
>
my
</span> <span class=
"hljs-type"
>
$c
</span> = <span class=
"hljs-function"
>
shift
</span>;
<span class=
"hljs-keyword"
>
my
</span> <span class=
"hljs-type"
>
$reindeer
</span> = <span class=
"hljs-type"
>
$c
</span>-
>
;<span class=
"hljs-type"
>reindeer</span>(<span class=
"hljs-type"
>
$c
</span>-
>
;<span class=
"hljs-type"
>stash</span>(&
#39;<span clas...
<span class=
"hljs-keyword"
>
return
</span> <span class=
"hljs-type"
>
$c
</span>-
>
;<span class=
"hljs-type"
>reply</span>-
>
;<span class=
"hljs-type"
>not_found</span> <span class=
"hljs-keyword"
>
unless
</span> <span class=
"hljs-type"
>
$reindeer
</span>;
<span class=
"hljs-type"
>
$c
</span>-
>
;<span class=
"hljs-type"
>respond_to</span>(
json =
>
; {json =
>
; <span class=
"hljs-type"
>
$reindeer
</span>},
xml =
>
; {template =
>
; &
#39;<span class="hljs-string">reindeer</span>', reindeer => <span class="hljs-type">$reindeer</span>},
txt =
>
; {text =
>
;
"
;<span class=
"hljs-type"
>
$reindeer
</span>-
>
;<span class=
"hljs-string"
>{name}: </span><span class=
"hljs-type"
>
$reindeer
</span>-
>
;<span class=
"hljs-string"
>{description}</span>
"
;},
any =
>
; {status =
>
; 406, text =
>
; &
#39;<span class="hljs-string">Only json, xml, and txt are supported</span>' },
);
};
<span class=
"hljs-keyword"
>
use
</span> <span class=
"hljs-function"
>Test::More</span>;
( run in 0.219 second using v1.01-cache-2.11-cpan-9b1e4054eb1 )