never mind.... my bad... i figured it out.. misread one of the docs...
in case anyone's interested... the following segment of code kind of shows how to access various headers... you can get a feel as to what's possible by looking at the UserAgent/Response/Request cpan/perl docs ------------------------------------------------------------- # go ahead and get the selection page within the frame.. # use www::machanize my $agent = WWW::Mechanize->new(); my $res1 = $agent->get($url); my $_form = $agent->form_number(1); if (!$_form) { warn "Nothing came back"; exit; } $agent->field($tmp->{'name'}, $tmp->{'val'}); $agent->field("Term", $semester->{'val'}); $res1 = $agent->submit(); print "-- ".$agent->content(). "\n"; #print "agent->agent = ". $res1->agent(). "\n"; print "agent->code = ". $res1->code(). "\n"; print "agent->msg = ". $res1->message(). "\n"; print "agent->base = ". $res1->base. "\n"; print "agent->ref = ". $res1->referer(). "\n"; print "agent->fieldname = ". $res1->header_field_names. "\n"; print "uri = ". $agent->uri(). "\n"; print "ref = ". $agent->response()->request()->referer(). "\n"; print "cont len = ". $agent->response()->request()->content_length(). "\n"; print "cont = ". $agent->response()->request()->content(). "\n"; print "req = ". $agent->response()->request()->as_string(). "\n"; print "-------------111111111----------\n"; foreach (keys %{$res1->headers()}) { print "$_ = ", $res1->headers()->{$_}, "\n"; } die; ------------------------------------------------------------------ enjoy.... -bruce -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of bruce Sent: Friday, June 25, 2004 12:26 PM To: [EMAIL PROTECTED]; [EMAIL PROTECTED] Subject: url/querystring question... hi... i'm implementing an app using www::mechanize. i'm curious about how i can actually see/access the url/querystring that's being generated by the "submit" of the form... i do a: $res = $agent->submit(); and i'm curious to know what's the actual URL/Querystring that's actually created/used... i'm assuming that the information is somewhere in the headers...??? thanks -bruce _______________________________________________ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs