Heh. You said this is busted

 WWW::Mechanize->new( 
     cookie_jar => $cookie_jar,
    );
[download]

you said its not picking up cookie and sending it. But the code does no checking of sent cookies. So how?