Select Code to Download

use Test::More;
use Data::Dumper;
...
is_deeply($got, $expect, "example test") or
    diag "got: " . Dumper($got) .
    " expected: " . Dumper($expect);