Trying to login into a passworded webpage 1

[skits2]

Hello,

I am trying to login a passworded webpage. The loging form for the webpage is

<form id="form1" name="form1" method="post" action="[URL unfurl="true"]http://www.linkalizer.com/login.php?fn=http://www.linkalizer.com/welcome.php">[/URL]
            <p><strong><br />
              Login </strong>username

                <input name="user_box" type="text" id="user_box" />
            password

              <input name="pass" type="password" id="pass" />
                 &nbsp;
                 <input type="submit" name="Submit" value="Go &gt;" />
                 <br />
                 <a href="[URL unfurl="true"]http://www.linkalizer.com/pass_forgot.php">Forgot[/URL] password</a></p>
            </form>

I have been trying to login using the script

$mech->get("[URL unfurl="true"]http://www.linkalizer.com/welcome.php");[/URL]

## Log in.
$mech->set_fields(
user_box => 'username@user.com',
pass => 'password',
);
$mech->submit();

      
print $mech->uri;
my $url = $mech->uri;
$content = get($url)   || die "get: $!";

$count++;

open (OVERWRITE, ">link_2_me_$count.htm") or die "$! error trying to overwrite";
print OVERWRITE $content;

but have not had any luck. It always kicks me out to the error logging in page. Any suggestions on how I can change my script to log in?

Thanks
Scott

 

[MOrac]

I'm guessing that you're using the Perl module

http://WWW::Mechanize,

but you don't say so. You should; it's tedious having to guess information you should be giving.

To solve your problem: replace your code:

my $url = $mech->uri;
$content = get($url)   || die "get: $!";

with:

$content = $mech->submit();

You're simply not submitting your data the way you're doing it.

 

[skits2]

Thank you for your help MOrac. I am indeed using

http://WWW:Mechanize.

I apologize for not including that information. Any questions I have in the future will be more thorough.

I do not know if that will fix my problem or not, but I will try it when I get home from work.

thanks again
Scott