#!/usr/bin/perl
use utf8;
use FindBin qw($Bin);
use lib "$Bin/../../lib";

use SMM::Test::Further;

api_auth_as user_id => 1, roles => ['superadmin'];

db_transaction {
    my $teste;

    # ao inves de
    my $list = rest_get '/public/companies';
    use DDP;

    my $goals =
      rest_get '/public/companies/' . $list->{companies}[0]->{id} . '/goals';
    p $goals;
};

done_testing;
