How to authorize with Test::WWW::Mechanize

I want to test a .htaccess protected page with Test::WWW::Mechanize but I don't know how can I send credentials开发者_如何转开发 for the page? I couldn't find a function that can handle this.

use Test::WWW::Mechanize;
my $mech = Test::WWW::Mechanize->new();
my ($user, $pass) = qw/user pass/;
$mech->credentials($user, $pass);
$mech->get_ok('http://example.com');