my $ok = eval {
                $c->authenticate(
                    { username => $user, password => $info->{password} },
                ); 
            };
            diag $@;
            diag $ok;
[...]
t/live_app_realms_progressive.t 
t/live_app_realms_progressive.t .. # 
# undef
[...]
# 
# undef

##</code><code>##

    my $res;
    my $ok= eval {
        $res= $c->...;
        1;
    };