#!/usr/bin/perl
 
     # create a new browser
    use WWW::Mechanize;
    my $mech = WWW::Mechanize->new();
    $mech->cookie_jar(HTTP::Cookies->new());