2011-03-10 15:19:34 +00:00
|
|
|
#!/usr/bin/env perl
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
use warnings;
|
|
|
|
|
2019-09-03 15:55:35 +02:00
|
|
|
use Test::More tests => 16;
|
2011-03-10 15:19:34 +00:00
|
|
|
use Test::Mojo;
|
|
|
|
|
2019-09-03 15:55:35 +02:00
|
|
|
use_ok( 'Carp' );
|
|
|
|
use_ok( 'Config' );
|
|
|
|
use_ok( 'DBI' );
|
2014-10-31 15:55:59 +01:00
|
|
|
use_ok( 'Date::Simple' );
|
2019-09-03 15:55:35 +02:00
|
|
|
use_ok( 'Digest::MD5' );
|
|
|
|
use_ok( 'Email::Sender::Simple' );
|
|
|
|
use_ok( 'Email::Simple' );
|
2014-10-31 15:55:59 +01:00
|
|
|
use_ok( 'Email::Valid' );
|
2019-09-03 15:55:35 +02:00
|
|
|
use_ok( 'Encode' );
|
|
|
|
use_ok( 'English' );
|
|
|
|
use_ok( 'File::Spec' );
|
|
|
|
use_ok( 'Mojolicious' );
|
|
|
|
use_ok( 'Pg::Explain' );
|
|
|
|
use_ok( 'Explain' );
|
2011-03-10 15:19:34 +00:00
|
|
|
|
2013-05-14 19:43:16 +02:00
|
|
|
my $t = Test::Mojo->new( 'Explain' );
|
2011-03-10 15:19:34 +00:00
|
|
|
|
|
|
|
$t->get_ok( '/' )->status_is( 200 );
|