use HTTP::Cookies;
use Log::Log4perl qw(:easy);
use WWW::Mechanize::Chrome;

my $cookie_dir = 'C:/Users/someuser/AppData/Local/Google/Chrome/User Data/Default/';
my $mech = WWW::Mechanize::Chrome->new(
    data_directory => $cookie_dir,
);

my $uri = URI->new( "https://www.something.com" ); 

my $username = 'user';
my $passwd = 'pass';

$mech->get( $uri );
$mech->set_fields(
	username => $username,
	password => $passwd,
);
$mech -> submit();