fix: guard validation helpers against undef IP

This commit is contained in:
2025-12-28 08:48:29 +01:00
parent 86007a74d8
commit 1826f7e847

View File

@@ -71,6 +71,7 @@ sub is_valid_url_length {
sub _is_valid_ipv4 {
my ( $self, $ip ) = @_;
return 0 unless defined $ip;
return 0 unless $ip =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/;
my ( $a, $b, $c, $d ) = ( $1, $2, $3, $4 );
return