Select Code to Download

#!perl -w
use strict;
...
use Dancer::Test;

plan tests => 3;

# set up our own database instead of whatever is in the config
my $conf = {
...
    dbh     => $dbh,
    sql     => 'sql/create.sql',
);

my $payload = join '',
              "\x89",
...
    },
    $payload
);

ok $content, "We successfully saved the user content";

...
my $name = $content->{digest} . ".png";
response_status_is ['GET',"/image_store/$name"], 200, "GET '/image_sto
+re/$name' succeeds"
    or diag Dumper read_logs();