HTTPS/Authenticated: Difference between revisions
< HTTPS
Content added Content deleted
m (→{{header|Python}}: Changed over to works with template) |
m (Moved to Net cat) |
||
Line 1: | Line 1: | ||
{{task}} |
{{task|Networking and Web Interaction}} |
||
The goal of this task is to demonstrate HTTPS requests with authentication. |
The goal of this task is to demonstrate HTTPS requests with authentication. |
Revision as of 00:05, 23 August 2008
HTTPS/Authenticated
You are encouraged to solve this task according to the task description, using any language you may know.
You are encouraged to solve this task according to the task description, using any language you may know.
The goal of this task is to demonstrate HTTPS requests with authentication.
Perl
use LWP::UserAgent qw(); my $ua = LWP::UserAgent->new; my $netloc = 'http://www.buddhism-dict.net/cgi-bin/xpr-dealt.pl:80'; $ua->credentials( $netloc, 'CJK-E and Buddhist Dictionaries', # basic realm 'guest', # user '', # empty pw ); my $response = $ua->get($netloc);
use WWW::Mechanize qw(); my $mech = WWW::Mechanize->new; $mech->get('https://login.yahoo.com/'); $mech->submit_form(with_fields => { login => 'XXXXXX', passwd => 'YYYYYY', '.persistent' => 'y', # tick checkbox });
Python
Note: You should install mechanize to run code below. Visit: http://wwwsearch.sourceforge.net/mechanize/
#!/usr/bin/python # -*- coding: utf-8 -*- from mechanize import Browser USER_AGENT = "Mozilla/5.0 (X11; U; Linux i686; tr-TR; rv:1.8.1.9) Gecko/20071102 Pardus/2007 Firefox/2.0.0.9" br = Browser() br.addheaders = [("User-agent", USER_AGENT)] # remove comment if you get debug output # br.set_debug_redirects(True) # br.set_debug_responses(True) # br.set_debug_http(True) br.open("https://www.facebook.com") br.select_form("loginform") br['email'] = "xxxxxxx@xxxxx.com" br['pass'] = "xxxxxxxxx" br['persistent'] = ["1"] response = br.submit() print response.read()