RE: Mechanize

[Paul Kraus]

Lol ... Now that is ironic... Should have read ...staring at the code to
long and was missing some obvious typo. :)

Paul

-----Original Message-----
From: Paul Kraus [mailto:[EMAIL PROTECTED] 
Sent: Friday, November 14, 2003 8:58 AM
To: 'Kevin Old'
Cc: 'Beginners Perl'
Subject: RE: Mechanize


Wow its working now. Must have been staring at the code to long and was
missing some obvious type... Thanks!!


How can I parse $a->content?

I must be missing something.

If I try to foreach ($a -> content){
        if (/someregeq/){
                print "$_\n";
      } 
}

It always prints. This is because all of content is look at as 1
element.

If I assign it to an array first I get the some kind of response. If I
try and use a while loop it just hangs indefinitely.

I know this is something easy. 

Paul
-----Original Message-----
From: Kevin Old [mailto:[EMAIL PROTECTED] 
Sent: Thursday, November 13, 2003 4:51 PM
To: [EMAIL PROTECTED]
Cc: 'Beginners Perl'
Subject: Re: Mechanize


On Thu, 2003-11-13 at 16:41, Paul Kraus wrote:
> Is it possible to connect to a 128bit encrypted web site with
> www::mechinize?
> 
> My boss wants me to write a script that will get a daily report for
> some of our financial web sites and merchant accounts.
> 
> This is kind of high priority so the sooner you can help the better.
> 
> This is the address I am trying to connect to
> https://webproe3.keybank.com/scripts/ndpluginisapi.dll/gtmCmHome/pgAut
> ho
> rization
> 
> But it fails every time returning nothing.
> 
> Paul

Paul,

Yes, it can be done....this code works for me:

#!/usr/bin/perl
#
use warnings;
use strict;
use WWW::Mechanize;

my $m = WWW::Mechanize->new;

$m->get("https://webproe3.keybank.com/scripts/ndpluginisapi.dll/gtmCmHom
e/pgAuthorization");

print $m->content();

Hope this helps,
Kevin
-- 
Kevin Old <[EMAIL PROTECTED]>


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]