The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Test::Mojo::Role::Log - test mojo log messages

SYNOPSIS

 use Test::Mojo;

 my $t = Test::Mojo->with_roles('+Log')->new('MyApp');
 
 $t->get_ok('/gugus')
    ->log_like(qr{GET "/gugus"})
    ->log_debug_like(qr{GET "/gugus"})
    ->log_info_unlike(qr{GET "/gugus"})
    ->log_debug_like(qr{200 OK.+s.+/s})

 done_testing();
 

DESCRIPTION

The Test::Mojo::Role::Log role enhances Test::Mojo with additional methods to check log output.

ATTRIBUTES

logCache

Points to an array with all the log messages issued since the last request.

METHODS

The role Test::Mojo::Role::Log adds the following new methods to Test::Mojo ones.

log_like($rx,$desc)

  $t->get_ok('/hello')
    ->log_like(undef,qr{/hello not found},"Request got logged")
 

Check if the given log message has been issued. All the log messages issued since the start of the current request will get checked. If $logLevel is set to undef the logLevel does not get checked.

log_trace_like($rx,$desc) (if mojo supports it)

Find a trace level log message matching the given $rx.

log_debug_like($rx,$desc)

Find a debug level log message matching the given $rx.

log_info_like($rx,$desc)

Find a info level log message matching the given $rx.

log_warn_like($rx,$desc)

Find a warn level log message matching the given $rx.

log_error_like($rx,$desc)

Find a error level log message matching the given $rx.

log_fatal_like($rx,$desc)

Find a fatal level log message matching the given $rx.

*_unlike

For each of the methods above there is ac coresponding

AUTHOR

Tobias Oetiker <tobi@oetiker.ch>

COPYRIGHT

Copyright 2020, OETIKER+PARTNER AG

LICENSE

Perl Artistic License