11 lines
249 B
Perl
11 lines
249 B
Perl
|
use Test::More tests => 2;
|
||
|
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
|
||
|
|
# the order is important
|
||
|
|
use DNSManager;
|
||
|
|
use Dancer::Test;
|
||
|
|
|
||
|
|
route_exists [GET => '/'], 'a route handler is defined for /';
|
||
|
|
response_status_is ['GET' => '/'], 200, 'response status is 200 for /';
|