# tests $filename file upload

use NGS::Test::Common; # imports all required modules (NGS, Plack::Test, etc)

my $app = NGS->to_app;
my $test = Plack::Test->create($app);

my $filename = 'single.vcf';
my @content = content_with_static_file($filename); # can return either array, or arrayref

say '###################################';
say "this test may take some time .....";
say '###################################';

my $response = $test->request( POST '/vep', @content ); # print_response($response);
is( $response->code, 200, '[POST /vep] success' );

like( $response->content, qr(@_) ) for (
    "Sample results for data src \"$filename\" [5]",
    'Processed 1 vep input rows',
    '1 accepted/filtered rows',
    '1 total source file rows',
    'sample match failures [0]',
    'VEP results [7]',
    'non-CDS [0]',
);

done_testing;