| Subject: | Use of uninitialized value in pattern match (m//) at lib/Captcha/reCAPTCHA.pm line 450 |
Since 0.98 version, t/21.check_answer_v2.t test produces a warning:
$ perl -Ilib t/21.check_answer_v2.t
1..12
# Create object
ok 1 - Captcha::reCAPTCHA: Created OK
# croaks on no response
ok 2 - Breaks on no arguments
ok 3 - Breaks on no response arg
Use of uninitialized value in pattern match (m//) at lib/Captcha/reCAPTCHA.pm line 450.
ok 4 - Google Say's the response is invalid
ok 5 - Simple correct: Created OK
ok 6 - An object of class 'Test::TCaptcha' isa 'Captcha::reCAPTCHA'
ok 7 - Simple correct: got response
ok 8 - Simple correct: result OK
ok 9 - Simple incorrect: Created OK
ok 10 - An object of class 'Test::TCaptcha' isa 'Captcha::reCAPTCHA'
ok 11 - Simple incorrect: got response
ok 12 - Simple incorrect: result OK