File: 06_load.t

package info (click to toggle)
libdancer-perl 1.3513%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 2,424 kB
  • sloc: perl: 7,386; xml: 2,139; sh: 54; makefile: 30; sql: 5
file content (14 lines) | stat: -rw-r--r-- 286 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
use Test::More 'no_plan', import => ['!pass'];

use Dancer ':syntax';
use Dancer::Test;

use FindBin qw($Bin);
use lib "$Bin/../../";

my $routes = path('t', '06_helpers', 'routes.pl');

ok( -f $routes, "file routes is found");
load $routes;

response_status_is [GET => '/foo'] => 200;