1234567891011121314151617 |
- use strict;
- use warnings;
- use Data::Dumper;
- use Bartender;
- use Test::More tests => 2;
- use Plack::Test;
- use HTTP::Request::Common;
- use JSON ();
- my $app = Bartender->to_app;
- my $test = Plack::Test->create($app);
- my $res = $test->request( GET '/status?dossier=foo&projetId=bar' );
- ok( $res->is_success, '[GET /status] successful' );
- my $compilation = JSON::decode_json( $res->content );
- is( $compilation->{status}, 'NONE', '[GET /status NONE] successful' );
|