use
lib
"$FindBin::Bin/../lib"
;
plugin
'DateTime'
;
my
%dt_test
= (
year
=> 2014,
month
=> 05,
day
=> 21,
hour
=> 22,
minute
=> 45,
second
=> 12
);
get
'/'
=>
sub
{
my
$self
=
shift
;
return
$self
->render(
text
=>
$self
->datetime(
%dt_test
) );
};
get
'/param-error'
=>
sub
{
my
$self
=
shift
;
return
$self
->render(
text
=>
eval
{
$self
->datetime} ||
'error'
);
};
get
'/short-way'
=>
sub
{
my
$self
=
shift
;
return
$self
->render(
text
=>
$self
->dt(
%dt_test
) );
};
get
'/now'
=>
sub
{
my
$self
=
shift
;
return
$self
->render(
text
=>
$self
->now );
};
my
$t
= Test::Mojo->new;
$t
->get_ok(
'/'
)->status_is(200)
->content_like(
qr/\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}/
);
$t
->get_ok(
'/param-error'
)->status_is(200)
->content_is(
'error'
);
$t
->get_ok(
'/short-way'
)->status_is(200)
->content_like(
qr/\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}/
);
$t
->get_ok(
'/now'
)->status_is(200)
->content_like(
qr/\d{4}-\d{2}-\d{2}T\d{2}:\d{2}:\d{2}/
);
done_testing;