|
Lines 213-218
sub api_routes {
Link Here
|
| 213 |
return decode_json($spec); |
213 |
return decode_json($spec); |
| 214 |
} |
214 |
} |
| 215 |
|
215 |
|
|
|
216 |
sub check_password { |
| 217 |
my ( $self, $args ) = @_; |
| 218 |
|
| 219 |
my $password = $args->{'password'}; |
| 220 |
if ( $password && $password =~ m/^\d\d\d\d$/ ) { |
| 221 |
return { error => 0 }; |
| 222 |
} |
| 223 |
else { |
| 224 |
return { |
| 225 |
error => 1, |
| 226 |
msg => "PIN should be four digits" |
| 227 |
}; |
| 228 |
} |
| 229 |
} |
| 230 |
|
| 216 |
sub _private_sub { |
231 |
sub _private_sub { |
| 217 |
return ""; |
232 |
return ""; |
| 218 |
} |
233 |
} |
| 219 |
- |
|
|