And then submit.pl contains:#---------------------------------------------------- # use STATEMENTS #---------------------------------------------------- use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); #---------------------------------------------------- # Get input from website #---------------------------------------------------- my $query = new CGI; my $form_product = $query->param('product'); my $form_tested_on_build = $query->param('tested_on'); my $form_feature = $query->param('feature'); my $form_crs_resolved = $query->param('crs_resolved'); my $form_comments = $query->param('comments'); my $form_paths = $query->param('paths'); . . . system ("submit.pl", $id_line, $form_tested_on_build, $form_feature, $ +form_crs_resolved, $form_comments, $temp_paths);
I am just concerned with the comments field for now, because the others are only 1 line. Let me know if there is anything else that will help. Thanks.#------------------------------------------- # use STATEMENTS #------------------------------------------- use CGI::Carp qw(fatalsToBrowser); use CGI; use strict; use WWW::Mechanize; use Time::HiRes; . . . # Second page of WSDBuild $agent->field("ID_BUILD_TESTED", "$ARGV[1]"); $agent->select("ID_TEAM", "3456"); # Defaulted to CDMA Common Compone +nt $agent->field("HEADLINE", "$ARGV[2]"); $agent->field("CR_LIST", join("\n", "$ARGV[3]")); #$agent->field("COMMENT", join("\n", "$ARGV[4]")); $agent->field("COMMENT", $ARGV[4]); #$agent->field("PATHS", join("\n", $ARGV[5])); $agent->click(); # Saves submitted page whether successful or not $agent->save_content("$log_file");
In reply to Re^4: WWW::Mechanize help
by ZimCS
in thread WWW::Mechanize help
by ZimCS
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |