t/01-basic.t


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#!/usr/bin/env perl
# Copyright (C) 2020 Birte Kristina Friesel
#
# SPDX-License-Identifier: CC0-1.0

use Test::More;
use Test::Mojo;

use FindBin;
require "$FindBin::Bin/../index.pl";

my $t = Test::Mojo->new('DBInfoscreen');
$t->get_ok('/')->status_is(200)->content_like(qr/DBF/);

done_testing();