Security Advisories (9)
CPANSA-Mojolicious-2022-03 (2022-12-10)

Mojo::DOM did not correctly parse <script> tags.

CPANSA-Mojolicious-2021-02 (2021-06-01)

Small sessions could be used as part of a brute-force attack to decode the session secret.

CVE-2021-47208 (2021-03-16)

A bug in format detection can potentially be exploited for a DoS attack.

CVE-2018-25100 (2018-02-13)

Mojo::UserAgent::CookieJar leaks old cookies because of the missing host_only flag on empty domain.

CPANSA-Mojolicious-2015-01 (2015-02-02)

Directory traversal on Windows

CPANSA-Mojolicious-2018-03 (2018-05-19)

Mojo::UserAgent was not checking peer SSL certificates by default.

CPANSA-Mojolicious-2018-02 (2018-05-11)

GET requests with embedded backslashes can be used to access local files on Windows hosts

CPANSA-Mojolicious-2014-01 (2014-10-07)

Context sensitivity of method param could lead to parameter injection attacks.

CVE-2024-58134 (2025-05-03)

Mojolicious versions from 0.999922 for Perl uses a hard coded string, or the application's class name, as a HMAC session secret by default. These predictable default secrets can be exploited to forge session cookies. An attacker who knows or guesses the secret could compute valid HMAC signatures for the session cookie, allowing them to tamper with or hijack another user's session.

NAME

Test::Mojo - Testing Mojo!

SYNOPSIS

use Test::More tests => 10;
use Test::Mojo;

my $t = Test::Mojo->new(app => 'MyApp');

$t->get_ok('/welcome')
  ->status_is(200)
  ->content_like(qr/Hello!/, 'welcome message!');

$t->post_form_ok('/search', {title => 'Perl', author => 'taro'})
  ->status_is(200)
  ->content_like(qr/Perl.+taro/);

$t->delete_ok('/something')
  ->status_is(200)
  ->header_is('X-Powered-By' => 'Mojolicious (Perl)')
  ->content_is('Hello world!');

DESCRIPTION

Test::Mojo is a collection of testing helpers for everyone developing Mojo and Mojolicious applications.

ATTRIBUTES

Test::Mojo implements the following attributes.

app

my $app = $t->app;
$t      = $t->app(MyApp->new);

Application to be tested.

tx

my $tx = $t->tx;
$t     = $t->tx(Mojo::Transaction::HTTP->new);

Current transaction, usually a Mojo::Transaction::HTTP object.

ua

my $ua = $t->ua;
$t     = $t->ua(Mojo::UserAgent->new);

User agent used for testing.

max_redirects

my $max_redirects = $t->max_redirects;
$t                = $t->max_redirects(3);

Maximum number of redirects, defaults to 0.

METHODS

Test::Mojo inherits all methods from Mojo::Base and implements the following new ones.

build_url

my $url = $t->build_url;

Build absolute Mojo::URL object for test server. Note that this method is EXPERIMENTAL and might change without warning!

$t->get_ok($t->build_url->userinfo('sri:secr3t')->path('/protected'));

content_is

$t = $t->content_is('working!');
$t = $t->content_is('working!', 'right content!');

Check response content for exact match.

content_like

$t = $t->content_like(qr/working!/);
$t = $t->content_like(qr/working!/, 'right content!');

Check response content for similar match.

content_type_is

$t = $t->content_type_is('text/html');

Check response Content-Type header for exact match.

content_type_like

$t = $t->content_type_like(qr/text/);
$t = $t->content_type_like(qr/text/, 'right content type!');

Check response Content-Type header for similar match.

delete_ok

$t = $t->delete_ok('/foo');
$t = $t->delete_ok('/foo', {Accept => '*/*'});
$t = $t->delete_ok('/foo', 'Hi!');
$t = $t->delete_ok('/foo', {Accept => '*/*'}, 'Hi!');

Perform a DELETE request and check for success.

element_exists

$t = $t->element_exists('div.foo[x=y]');
$t = $t->element_exists('html head title', 'has a title');

Checks for existence of the CSS3 selectors first matching XML/HTML element with Mojo::DOM.

get_ok

$t = $t->get_ok('/foo');
$t = $t->get_ok('/foo', {Accept => '*/*'});
$t = $t->get_ok('/foo', 'Hi!');
$t = $t->get_ok('/foo', {Accept => '*/*'}, 'Hi!');

Perform a GET request and check for success.

head_ok

$t = $t->head_ok('/foo');
$t = $t->head_ok('/foo', {Accept => '*/*'});
$t = $t->head_ok('/foo', 'Hi!');
$t = $t->head_ok('/foo', {Accept => '*/*'}, 'Hi!');

Perform a HEAD request and check for success.

header_is

$t = $t->header_is(Expect => 'fun');

Check response header for exact match.

header_like

$t = $t->header_like(Expect => qr/fun/);
$t = $t->header_like(Expect => qr/fun/, 'right header!');

Check response header for similar match.

json_content_is

$t = $t->json_content_is([1, 2, 3]);
$t = $t->json_content_is([1, 2, 3], 'right content!');
$t = $t->json_content_is({foo => 'bar', baz => 23}, 'right content!');

Check response content for JSON data.

post_ok

$t = $t->post_ok('/foo');
$t = $t->post_ok('/foo', {Accept => '*/*'});
$t = $t->post_ok('/foo', 'Hi!');
$t = $t->post_ok('/foo', {Accept => '*/*'}, 'Hi!');
$t = $t->post_ok('/foo', 'Hi!', 'request worked!');

Perform a POST request and check for success.

post_form_ok

$t = $t->post_form_ok('/foo' => {test => 123});
$t = $t->post_form_ok('/foo' => 'UTF-8' => {test => 123});
$t = $t->post_form_ok('/foo', {test => 123}, {Accept => '*/*'});
$t = $t->post_form_ok('/foo', 'UTF-8', {test => 123}, {Accept => '*/*'});
$t = $t->post_form_ok('/foo', {test => 123}, 'Hi!');
$t = $t->post_form_ok('/foo', 'UTF-8', {test => 123}, 'Hi!');
$t = $t->post_form_ok('/foo', {test => 123}, {Accept => '*/*'}, 'Hi!');
$t = $t->post_form_ok(
  '/foo',
  'UTF-8',
  {test   => 123},
  {Accept => '*/*'},
  'Hi!'
);

Submit a POST form and check for success.

put_ok

$t = $t->put_ok('/foo');
$t = $t->put_ok('/foo', {Accept => '*/*'});
$t = $t->put_ok('/foo', 'Hi!');
$t = $t->put_ok('/foo', {Accept => '*/*'}, 'Hi!');

Perform a PUT request and check for success.

reset_session

$t = $t->reset_session;

Reset user agent session.

status_is

$t = $t->status_is(200);

Check response status for exact match.

text_is

$t = $t->text_is('div.foo[x=y]' => 'Hello!');
$t = $t->text_is('html head title' => 'Hello!', 'right title');

Checks text content of the CSS3 selectors first matching XML/HTML element for exact match with Mojo::DOM.

text_like

$t = $t->text_like('div.foo[x=y]' => qr/Hello/);
$t = $t->text_like('html head title' => qr/Hello/, 'right title');

Checks text content of the CSS3 selectors first matching XML/HTML element for similar match with Mojo::DOM.

SEE ALSO

Mojolicious, Mojolicious::Guides, http://mojolicio.us.