File tree Expand file tree Collapse file tree 2 files changed +17
-10
lines changed
web_programming/recaptcha_verification Expand file tree Collapse file tree 2 files changed +17
-10
lines changed Original file line number Diff line number Diff line change @@ -40,9 +40,10 @@ sub is_valid_captcha {
4040 return 0;
4141 }
4242 }
43-
44- # Connection to reCAPTCHA failed
45- return 0;
43+ else {
44+ # Connection to reCAPTCHA failed
45+ return 0;
46+ }
4647}
4748
4849# https://docs.mojolicious.org/Mojolicious/Lite#Helpers
@@ -53,15 +54,19 @@ sub is_valid_captcha {
5354 if (($c -> param(' username' ) eq ' admin' ) && ($c -> param(' password' ) eq ' admin' )) {
5455 return 1;
5556 }
56- return 0;
57+ else {
58+ return 0;
59+ }
5760};
5861
5962helper verify_captcha => sub {
6063 my $c = shift ;
6164 if (is_valid_captcha($c )) {
6265 return 1;
6366 }
64- return 0;
67+ else {
68+ return 0;
69+ }
6570};
6671
6772helper ua => sub {
Original file line number Diff line number Diff line change 1818use warnings;
1919use Mojolicious::Lite;
2020use Mojo::UserAgent;
21- use Data::Dumper;
2221
2322# Add your 'Secret Key' here
2423$ENV {' CAPTCHA_V3_SECRET_KEY' } = " " ;
@@ -46,9 +45,10 @@ sub is_valid_captcha {
4645 return 0;
4746 }
4847 }
49-
50- # Connection to reCAPTCHA failed
51- return 0;
48+ else {
49+ # Connection to reCAPTCHA failed
50+ return 0;
51+ }
5252}
5353
5454# https://docs.mojolicious.org/Mojolicious/Lite#Helpers
@@ -59,7 +59,9 @@ sub is_valid_captcha {
5959 if (($c -> param(' username' ) eq ' admin' ) && ($c -> param(' password' ) eq ' admin' )) {
6060 return 1;
6161 }
62- return 0;
62+ else {
63+ return 0;
64+ }
6365};
6466
6567helper ua => sub {
You can’t perform that action at this time.
0 commit comments