07-28-2011
As far as I know
LWP::UserAgent doesn't parse or evaluate
JavaSript.
You could find more details on how you could eventually handle such situations
here.
8 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi Scripting Gurus, I am new bee in perl, and trying to write a script which must print the free disk space availability of C and E drives. Please advice.
Here is the script snippet and expected output:
#!/usr/bin/perl
use CGI qw/:html3 :standard/;
$spaceuselog =... (4 Replies)
Discussion started by: ccsaviour
4 Replies
2. Shell Programming and Scripting
Hi All,
I have the following sql query
select abcd from udbadm.log where xyz='1'.
I have 16k queries similar to this with different values for xyz.
I want to print the values of 'abcd' for each row.
I have the following perl code, but not sure how i can print that particular... (1 Reply)
Discussion started by: userscript
1 Replies
3. Shell Programming and Scripting
Hey Guys,
I have some weird problem with printing scalars ...
When I'm executing script both are printing in terminal ...
But only one is printed to the file ?
I don't know whats going on .. :)
Btw .. I'm noobie :) took me lots of time to put this simple script together :)
Thank you... (3 Replies)
Discussion started by: NDxiak
3 Replies
4. Shell Programming and Scripting
Can we please modify this perl one-liner to print lines between pattern1 and pattern2 in a file?
Currently it prints lines till pattern2. (4 Replies)
Discussion started by: anand_bh
4 Replies
5. Shell Programming and Scripting
I have a script which is supposed to log in to my vB account and print my security token, however doesn't seem to work globally. The logging in works perfectly just will not retrieve and print the security token for every forum I log in to. Code Below:
#!/usr/bin/perl
use LWP::UserAgent;
... (8 Replies)
Discussion started by: AndrewTwain
8 Replies
6. Shell Programming and Scripting
Hi,
I have a file with lines like this.
2 7 18 ggcgt anna
2 7 18 hhchc sam
3 7 18 hhdjcc ross
4 7 18 hhcjd jenny
0 8 21 jjdhs sam
3 8 21 kkok bush
2 9 24 kosss BrenhamIf the values of the second column are equal, print only those lines with the least first column value. So in... (5 Replies)
Discussion started by: polsum
5 Replies
7. Shell Programming and Scripting
Hey guys i am using perl and trying to pull a list of books from a database and then populate the list in a separate TT2 file. When the list is generated there should be 39 book names. When I do the foreach statement in my tt2 below, the first statement gives me 39 Array(random number) and the... (1 Reply)
Discussion started by: Joey12
1 Replies
8. Forum Support Area for Unregistered Users & Account Problems
I got this message while submitting a reply to a thread. I could submitt the replies till yesterday but today it shows me the following message
"Your submission could not be processed because a security token was missing."
What should I do to resolve this? (1 Reply)
Discussion started by: Akang
1 Replies
LEARN ABOUT OSX
lwp::authen::ntlm
LWP::Authen::Ntlm(3) User Contributed Perl Documentation LWP::Authen::Ntlm(3)
NAME
LWP::Authen::Ntlm - Library for enabling NTLM authentication (Microsoft) in LWP
SYNOPSIS
use LWP::UserAgent;
use HTTP::Request::Common;
my $url = 'http://www.company.com/protected_page.html';
# Set up the ntlm client and then the base64 encoded ntlm handshake message
my $ua = LWP::UserAgent->new(keep_alive=>1);
$ua->credentials('www.company.com:80', '', "MyDomain\MyUserCode", 'MyPassword');
$request = GET $url;
print "--Performing request now...-----------
";
$response = $ua->request($request);
print "--Done with request-------------------
";
if ($response->is_success) {print "It worked!->" . $response->code . "
"}
else {print "It didn't work!->" . $response->code . "
"}
DESCRIPTION
"LWP::Authen::Ntlm" allows LWP to authenticate against servers that are using the NTLM authentication scheme popularized by Microsoft.
This type of authentication is common on intranets of Microsoft-centric organizations.
The module takes advantage of the Authen::NTLM module by Mark Bush. Since there is also another Authen::NTLM module available from CPAN by
Yee Man Chan with an entirely different interface, it is necessary to ensure that you have the correct NTLM module.
In addition, there have been problems with incompatibilities between different versions of Mime::Base64, which Bush's Authen::NTLM makes
use of. Therefore, it is necessary to ensure that your Mime::Base64 module supports exporting of the encode_base64 and decode_base64
functions.
USAGE
The module is used indirectly through LWP, rather than including it directly in your code. The LWP system will invoke the NTLM
authentication when it encounters the authentication scheme while attempting to retrieve a URL from a server. In order for the NTLM
authentication to work, you must have a few things set up in your code prior to attempting to retrieve the URL:
o Enable persistent HTTP connections
To do this, pass the "keep_alive=>1" option to the LWP::UserAgent when creating it, like this:
my $ua = LWP::UserAgent->new(keep_alive=>1);
o Set the credentials on the UserAgent object
The credentials must be set like this:
$ua->credentials('www.company.com:80', '', "MyDomain\MyUserCode", 'MyPassword');
Note that you cannot use the HTTP::Request object's authorization_basic() method to set the credentials. Note, too, that the
'www.company.com:80' portion only sets credentials on the specified port AND it is case-sensitive (this is due to the way LWP is coded,
and has nothing to do with LWP::Authen::Ntlm)
AVAILABILITY
General queries regarding LWP should be made to the LWP Mailing List.
Questions specific to LWP::Authen::Ntlm can be forwarded to jtillman@bigfoot.com
COPYRIGHT
Copyright (c) 2002 James Tillman. All rights reserved. This program is free software; you can redistribute it and/or modify it under the
same terms as Perl itself.
SEE ALSO
LWP, LWP::UserAgent, lwpcook.
perl v5.16.2 2012-01-13 LWP::Authen::Ntlm(3)