my $bot = WWW::Mechanize->new();
 $bot->agent_alias( 'Linux Mozilla' );
 # Create a cookie jar for the login credentials
 $bot->cookie_jar(         HTTP::Cookies->new(             file           => "cookies.txt",
                                              autosave       => 1,
                                              ignore_discard => 1,     ) );