This distribution has been tested as part of the cpan-testers effort to test as many new uploads to CPAN as possible. See http://testers.cpan.org/
Please cc any replies to [email protected] to keep other test volunteers informed and to prevent any duplicate effort. -- Dear Max Maischein, This is a computer-generated report for WWW-Mechanize-Shell-0.45 on perl-5.6.2, created automatically by CPAN-Reporter-0.99_14 and sent to the CPAN Testers mailing list. If you have received this email directly, it is because the person testing your distribution chose to send a copy to your CPAN email address; there may be a delay before the official report is received and processed by CPAN Testers. Thank you for uploading your work to CPAN. However, it appears that there were some problems with your distribution. Sections of this report: * Tester comments * Program output * Prerequisites * Environment and other context ------------------------------ TESTER COMMENTS ------------------------------ Additional comments from tester: [none provided] ------------------------------ PROGRAM OUTPUT ------------------------------ Output from '/usr/bin/make test': PERL_DL_NONLAZY=1 /usr/local/perl-5.6.2/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t t/00-use...........................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/00a-Term-Shell-catch-smry........ok t/01-fallback-Win32-OLE............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/02-fallback-HTML-TableExtract....Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/02-fallback-Pod-Constant.........Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/03-documentation.................ok 119/119 skipped: various reasons t/04-history-invariant.............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/05-options.......................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/06-valid-output..................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/07-history-items.................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/08-unknown-command...............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/09-invalid-filename..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/10-nonexistent-host..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/11-browse-without-request........Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/12-comments......................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/13-command-au....................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/14-command-identity..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. # Loading HTTP::Daemon # Spawning local test server # on port 45357 # Failed test 'auth compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/5wMTNF2Krz syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->credentials('localhost:80','realm','user','password'); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->uri } , "\n"; # Failed test 'autofill compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/510RuNgv1D syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->add_filler( "query" => "Fixed" => 'foo' ); # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print do { $agent->uri } , "\n"; # Failed test 'back compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/64Y4DkFSwS syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('n' => 1); # $agent->back(); # print do { $agent->uri } , "\n"; # Failed test 'comment compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/vqlGertZq3 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->uri } , "\n"; # Failed test 'content_save compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/eeLWdeWzC6 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { my $filename = q{tmp.content}; # local *F; # open F, "> $filename" or die "$filename: $!"; # binmode F; # print F $agent->content,"\n"; # close F # }; # print do { unlink "tmp.content" } , "\n"; # print do { $agent->uri } , "\n"; # Failed test 'eval compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/jKwSHWUF2I syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { "Hello World" } , "\n"; # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { "Goodbye World" } , "\n"; # print do { $agent->uri } , "\n"; # Failed test 'eval_multiline compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/HNBMwECRfn syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->add_filler( "query" => "Keep" => ); # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print do { "Hello World ", # "from ",$agent->uri } , "\n"; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'eval_shell compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/or98k0Lqtk syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->ct } , "\n"; # print do { $agent->uri } , "\n"; # Failed test 'eval_sub compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/XkIRnktd8O syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { sub ::custom_today { "20030511" }; } , "\n"; # $formfiller->add_filler( "session" => "Callback" => '::custom_today' ); # $formfiller->add_filler( "query" => "Keep" => ); # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # print do { $agent->current_form->value("session") } , "\n"; # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'form_name compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/96rf3XSELO syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->form_name('f'); # $agent->submit(); # print do { $agent->uri } , "\n"; # Failed test 'form_num compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/SgUc9lRPvP syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->form_number(1); # $agent->submit(); # print do { $agent->uri } , "\n"; # Failed test 'formfiller_chars compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/bVtQYw0jsF syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { srand 0 } , "\n"; # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->add_filler( "query" => "Random::Chars" => 'size','5','set','alpha' ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_date compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/uF1jwqW2ub syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { srand 0 } , "\n"; # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->add_filler( "query" => "Random::Date" => 'string','%Y%m%d' ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_default compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/VtQYw0jsFc syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $formfiller->add_filler( "query" => "Default" => 'foo' ); # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_fixed compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/GhYj71KRQ5 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $formfiller->add_filler( "query" => "Fixed" => 'foo' ); # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_keep compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/bwHF6BJXJg syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $formfiller->add_filler( "query" => "Keep" => ); # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_random compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/aQTvGvrNvZ syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $formfiller->add_filler( "query" => "Random" => 'foo' ); # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_re compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/uF1jwqW2ub syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { srand 0 } , "\n"; # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->add_filler( qr((?-xism:qu)) => "Random::Date" => 'string','%Y%m%d' ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'formfiller_word compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/F1jwqW2ubV syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { srand 0 } , "\n"; # $formfiller->add_filler( "cat" => "Keep" => ); # $formfiller->add_filler( "query" => "Random::Word" => 'size','1' ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'get compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/tQYw0jsFcG syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->uri } , "\n"; # Failed test 'get_content compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/hYj71KRQ5b syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'get_redirect compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/wHF6BJXJg2 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/redirect/startpage'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->uri } , "\n"; # Failed test 'get_save compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/aQTvGvrNvZ syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # my @links; # my @all_links = $agent->links(); # my $count = -1; # @links = map { $count++; (($_->text =~ qr((?-xism:\.save_log_server_test\.tmp$)))||($_->url =~ qr((?-xism:\.save_log_server_test\.tmp$)))) ? $count : () } @all_links; # my $base = $agent->uri; # for my $link (@links) { # my $target = $all_links[$link]->url; # my $url = URI::URL->new($target,$base); # $target = $url->path; # $target =~ s!^(.*/)?([^/]+)$!$2!; # $url = $url->abs; # # # use this line instead of the next in case you want to use smart mirroring # #$agent->mirror($url,$target); # $agent->get( $url, ':content_file' => $target ); # }; # # print do { $agent->uri } , "\n"; # Failed test 'get_value2_submit compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/o5fqbljncn syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { local $^W; $agent->current_form->value('query', 'foo'); }; # { local $^W; $agent->current_form->value('session', '2'); }; # $agent->submit(); # print do { $agent->uri } , "\n"; # Failed test 'get_value_click compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/I7IbU7WYG7 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { local $^W; $agent->current_form->value('query', 'foo'); }; # $agent->click('submit'); # print do { $agent->uri } , "\n"; # Failed test 'get_value_submit compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/9j1J4oD77w syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { local $^W; $agent->current_form->value('query', 'foo'); }; # $agent->submit(); # print do { $agent->uri } , "\n"; # Failed test 'interactive_script_creation compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/xjR7jbX5Bv syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { @::list=qw(foo bar xxx) } , "\n"; # print do { no warnings qw"redefine once"; *WWW::Mechanize::FormFiller::Value::Ask::ask_value = sub { my $value=shift @::list; push @{$_[0]->{shell}->{answers}}, [ $_[1]->name, $value ]; $value } } , "\n"; # $formfiller->add_filler( "cat" => "Keep" => ); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->add_filler( 'session' => Fixed => 'foo' ); # $formfiller->add_filler( 'query' => Fixed => 'bar' ); # $formfiller->add_filler( 'submit' => Fixed => 'xxx' );$formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_parm compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/skanuEDwrH syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('n' => 1); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/SEqWtMJKzi syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text' => 'Link foo1.save_log_server_test.tmp'); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re2 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/TgaNtAkd6v syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:foo1))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re3 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/HAe00F1wjG syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:Link /foo))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re4 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/zu4f27jdZo syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:Link /foo))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re5 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/2kN9Jrr9oo syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:Link /$))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re6 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/0q8UxJ1la8 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:^/Link$))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'open_re7 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/1cP00tIdwe syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:^/Link in slashes/))); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'reload compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/jbCUakFpkO syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->reload; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'reload_2 compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/u71EhXAsDB syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $agent->follow_link('text_regex' => qr((?-xism:Link /foo))); # $agent->reload; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'tick compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/vm5hZYMTMl syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { local $^W; for ('cat_foo') { $agent->tick('cat', $_); };} # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'tick_all compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/XJcxLsdInP syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # # { local $^W; my $index = 0; # while(my $input = $agent->current_form->find_input('cat','checkbox',$index)) { # my $value = (grep { defined $_ } ($input->possible_values()))[0]; # $agent->tick('cat',$value); # $index++; # }; # } # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'timeout compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/H2GuXiEXmw syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->timeout(60); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'ua_get compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/aziteQeee0 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->agent('foo/1.1'); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print do { $agent->uri } , "\n"; # Failed test 'ua_get_content compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/4WhllbrNvS syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->agent('foo/1.1'); # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'untick compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/wF357mEHnE syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # { local $^W; for ('cat_foo') { $agent->untick('cat', $_); };} # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'untick_all compiles' # at t/14-command-identity.t line 254. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/iOl5jjcHO9 syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # $agent->get('http://k75:45357/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # # { local $^W; my $index = 0; # while(my $input = $agent->current_form->find_input('cat','checkbox',$index)) { # my $value = (grep { defined $_ } ($input->possible_values()))[0]; # $agent->untick('cat',$value); # $index++; # }; # } # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Looks like you failed 44 tests of 353. dubious Test returned status 44 (wstat 11264, 0x2c00) DIED. FAILED tests 7, 15, 23, 31, 39, 47, 55, 63, 71, 79, 87, 95, 103, 111, 119, 127, 135, 143, 151, 159, 167, 175, 183, 191, 199, 207, 215, 223, 231, 239, 247, 255, 263, 271, 279, 287, 295, 303, 311, 319, 327, 335, 343, 351 Failed 44/353 tests, 87.54% okay (less 88 skipped tests: 221 okay, 62.61%) t/15-history-save..................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/16-form-fillout..................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. # Failed test 'interactive_script_creation compiles' # at t/16-form-fillout.t line 107. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201.' # expected: '/tmp/jDdGExHOHJ syntax OK' # #!/usr/local/perl-5.6.2/bin/perl -w # use strict; # use WWW::Mechanize; # use WWW::Mechanize::FormFiller; # use URI::URL; # # my $agent = WWW::Mechanize->new( autocheck => 1 ); # my $formfiller = WWW::Mechanize::FormFiller->new(); # $agent->env_proxy(); # # print do { @::list=qw(1 2 3 4 5 6 7 8 9 10 foo NY 11 DE 13 V 15 16 2038-01-01) } , "\n"; # print do { no warnings qw"once redefine"; # *WWW::Mechanize::FormFiller::Value::Ask::ask_value = sub { # #warn "Filled out ",$_[1]->name; # my $value=shift @::list || "empty"; # push @{$_[0]->{shell}->{answers}}, [ $_[1]->name, $value ]; # $value # } } , "\n"; # $agent->get('http://k75:52261/'); # $agent->form_number(1) if $agent->forms and scalar @{$agent->forms}; # $formfiller->add_filler( 'recipient_first_name' => Fixed => '1' ); # $formfiller->add_filler( 'recipient_middle_name' => Fixed => '2' ); # $formfiller->add_filler( 'recipient_last_name' => Fixed => '3' ); # $formfiller->add_filler( 'recipient_nick_name' => Fixed => '4' ); # $formfiller->add_filler( 'recipient_room_number' => Fixed => '5' ); # $formfiller->add_filler( 'card_amount' => Fixed => '6' ); # $formfiller->add_filler( 'billing_first_names' => Fixed => '7' ); # $formfiller->add_filler( 'billing_last_name' => Fixed => '8' ); # $formfiller->add_filler( 'billing_email' => Fixed => '9' ); # $formfiller->add_filler( 'billing_line1' => Fixed => '10' ); # $formfiller->add_filler( 'billing_city' => Fixed => 'foo' ); # $formfiller->add_filler( 'billing_usps_abbrev' => Fixed => 'NY' ); # $formfiller->add_filler( 'billing_zip_code' => Fixed => '11' ); # $formfiller->add_filler( 'billing_country_code' => Fixed => 'DE' ); # $formfiller->add_filler( 'billing_daytime_phone' => Fixed => '13' ); # $formfiller->add_filler( 'billing_card_type' => Fixed => 'V' ); # $formfiller->add_filler( 'billing_name_on_card' => Fixed => '15' ); # $formfiller->add_filler( 'billing_card_number' => Fixed => '16' ); # $formfiller->add_filler( 'creditcard_expire' => Fixed => '2038-01-01' ); # $formfiller->add_filler( 'Submit' => Fixed => 'empty' );$formfiller->fill_form($agent->current_form); # $agent->submit(); # print $agent->content,"\n"; # print do { $agent->uri } , "\n"; # Failed test 'Script interactive_script_creation didn't compile' # at t/16-form-fillout.t line 110. # Failed test 'Script interactive_script_creation didn't compile' # at t/16-form-fillout.t line 111. # Looks like you failed 3 tests of 7. dubious Test returned status 3 (wstat 768, 0x300) DIED. FAILED tests 5-7 Failed 3/7 tests, 57.14% okay t/17-eval-multiline................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/18-browser-autosync..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/19-value-multi...................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/20-restart-without-script........Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. # Failed test ''restart' on -e dosen't crash' # at t/20-restart-without-script.t line 18. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. # OK' # expected: 'OK' # Looks like you failed 1 test of 4. dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test 4 Failed 1/4 tests, 75.00% okay t/21-autofill-re...................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/22-complete-command..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/23-check-dumpresponses...........Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/24-source-file...................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/25-save-file-nolink..............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/26-form-no-form..................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/27-form_number...................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/28-cmd-title.....................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/28-html-tableextract.............Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok 1/3 skipped: various reasons t/29-launch-shell..................Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. ok t/98-bin........................... # Failed test 'Script 'bin/wwwshell.pl' compiles' # at t/98-bin.t line 29. # got: 'Misplaced _ in number at /usr/local/perl-5.6.2/lib/site_perl/5.6.2/WWW/Mechanize.pm line 201. # bin/wwwshell.pl syntax OK' # expected: 'bin/wwwshell.pl syntax OK' # Looks like you failed 1 test of 1. dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test 1 Failed 1/1 tests, 0.00% okay t/99-manifest......................ok t/99-pod...........................ok t/99-todo..........................ok t/99-unix-text.....................ok Failed Test Stat Wstat Total Fail List of Failed ------------------------------------------------------------------------------- t/14-command-identity.t 44 11264 353 44 7 15 23 31 39 47 55 63 71 79 87 95 103 111 119 127 135 143 151 159 167 175 183 191 199 207 215 223 231 239 247 255 263 271 279 287 295 303 311 319 327 335 343 351 t/16-form-fillout.t 3 768 7 3 5-7 t/20-restart-without-script.t 1 256 4 1 4 t/98-bin.t 1 256 1 1 1 208 subtests skipped. Failed 4/38 test scripts. 49/768 subtests failed. Files=38, Tests=768, 197 wallclock secs (62.01 cusr + 9.18 csys = 71.19 CPU) Failed 4/38 test programs. 49/768 subtests failed. make: *** [test_dynamic] Error 11 ------------------------------ PREREQUISITES ------------------------------ Prerequisite modules loaded: requires: Module Need Have -------------------------- ---- ----- Hook::LexWrap 0.2 0.20 HTML::Display 0 0.38 HTML::TokeParser::Simple 2 3.15 LWP 5.69 5.806 Term::Shell 0.02 0.02 Test::Harness 2.3 2.64 URI::URL 0 5.03 WWW::Mechanize 1.2 1.30 WWW::Mechanize::FormFiller 0.05 0.06 ------------------------------ ENVIRONMENT AND OTHER CONTEXT ------------------------------ Environment variables: LANG = C PATH = /usr/lib/ccache:/home/sand/bin:/usr/local/bin:/usr/bin:/bin:/usr/bin/X11:/usr/games:/usr/local/perl/bin:/usr/X11/bin:/sbin:/usr/sbin PERL5LIB = PERL5_CPANPLUS_IS_RUNNING = 31746 PERL5_CPAN_IS_RUNNING = 31746 PERL_MM_USE_DEFAULT = 1 SHELL = /usr/bin/zsh TERM = screen Perl special variables (and OS-specific diagnostics, for MSWin32): $^X = /usr/local/perl-5.6.2/bin/perl $UID/$EUID = 1005 / 1005 $GID = 1005 1005 $EGID = 1005 1005 Perl module toolchain versions installed: Module Have ------------------- ------ CPAN 1.9203 Cwd 3.25 ExtUtils::CBuilder 0.19 ExtUtils::Command 1.13 ExtUtils::Install 1.44 ExtUtils::MakeMaker 6.36 ExtUtils::Manifest 1.51 ExtUtils::ParseXS 2.18 File::Spec 3.25 Module::Build 0.2808 Module::Signature 0.55 Test::Harness 2.64 Test::More 0.72 YAML n/a YAML::Syck 0.85 version 0.73 -- Summary of my perl5 (revision 5.0 version 6 subversion 2) configuration: Platform: osname=linux, osvers=2.6.16-2-k7, archname=i686-linux-64int uname='linux k75 2.6.16-2-k7 #2 mon may 22 23:23:54 utc 2006 i686 gnulinux ' config_args='-Dprefix=/usr/local/perl-5.6.2 -Dinstallusrbinperl=n -Uversiononly -Doptimize=-g -es -Duse64bitint -Dusedevel -des' hint=recommended, useposix=true, d_sigaction=define usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef use64bitint=define use64bitall=undef uselongdouble=undef Compiler: cc='cc', ccflags ='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-g', cppflags='-DDEBUGGING -fno-strict-aliasing -I/usr/local/include' ccversion='', gccversion='4.0.4 20060507 (prerelease) (Debian 4.0.3-3)', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=4, usemymalloc=n, prototype=define Linker and Libraries: ld='cc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib libs=-lnsl -lgdbm -ldb -ldl -lm -lc -lcrypt -lutil perllibs=-lnsl -ldl -lm -lc -lcrypt -lutil libc=/lib/libc-2.3.6.so, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic' cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
