I’m using WWW::Mechanize for testing my CGI.
I’m having trouble with the $mech-tick
Here’s my code :
ok($mech-form_name('cdr_format'),getting form cdr_format);
print pAllFields = . $mech-value('pAllFields') . \n;
219- ok($mech-tick('pAllFields',1), 'Setting checkbox to native CDR format');
well, are you passing the authentication credentials when you create
the LWP useragent?
IIRC, there's a whole section in the LWP documentation on HTTP basic auth...
(also, you might want to consider taking your questions over to
'beginn...@perl.org' -- not sure there are that many people on this
Look at the source code for the module. The 'tick' method just uses a
bare 'return' on success, which means it's going to fail an ok() test
regardless of whether or not it works.
You may also want to look at Test::WWW::Mechanize.
chrs,
john.
On Tue, Nov 4, 2014 at 7:30 AM, Patton, Billy N