This excellent suggestion is a good start, but it doesn't get me there. I've altered the code to fit my current understanding, but my $mech object, even after the post, still represents the initial page, not the results page.

I'm encouraged that I can in fact retrieve the initial page, but discouraged not to be able to get to the results (whether I upload the sequences as a file via the 'upfile1' attribute, or, as below, include them as a text field). Here's what I have:

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

my $hypermutUrl =
  "http://www.hiv.lanl.gov/content/sequence/HYPERMUT/hypermut.html";
my $mech = WWW::Mechanize->new( autocheck => 1 );

my $alignment_as_string = <<'END_SEQS';
>HIV1-test.CONS
ATGGGATGTCTTGGGAATCAGCTGCTTATCGCGCTCTTGCTAGTAAGTGCTTTAGAGATTTATTGTGTTC
>HIV1-test.1
ATGGAATGTCTTGGAAATCAGCTGCTTATCGCGCTCTTGCTAGTAAGTGCTTTAAAGATTTATTGTGTTC
>HIV1-test.2
ATGGAATGTCTTGGGAATCAGCTGCTTATCGCGCTCTTGCTAGTAAGTGCTTTAAAGATTTATTGTGTTC
END_SEQS

$mech->post(
    $hypermutUrl,
    'FORMAT'            => 'FASTA',
    'ALIGNMENT'         => $alignment_as_string,
    'upfile1'           => '',
    'INN'               => '',
    'OUT'               => '',
    'MUTUPSTREAM'       => '',
    'MUTFROM'           => 'G',
    'MUTTO'             => 'A',
    'MUTDOWNSTREAM'     => 'RD',
    'ENFORCE'           => 'DESCENDANT',
    'CONTROLUPSTREAM'   => '',
    'CONTROLFROM'       => 'G',
    'CONTROLTO'         => 'A',
    'CONTROLDOWNSTREAM' => 'YN|RC',
    'Analysis'          => 'All',
    'submit'            => 'Run',
);

my $page = $mech->content;
open my $FH, ">/tmp/hypermut.html";
print {$FH} $page; close $FH;
warn "saved webpage data to /tmp/hypermut.html\n";

[download]

I would expect the post operation to add the page resulting from that post to my $mech object -- where am I going wrong?

In reply to Re^3: www::mechanize: second "submit" invisible to find_all_submits by wfischer
in thread www::mechanize: second "submit" invisible to find_all_submits by wfischer

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.