diff options
Diffstat (limited to 'URI/_userpass.pm')
| -rw-r--r-- | URI/_userpass.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/URI/_userpass.pm b/URI/_userpass.pm index a0361ae..87d7fb5 100644 --- a/URI/_userpass.pm +++ b/URI/_userpass.pm @@ -21,7 +21,7 @@ sub user $self->userinfo("$new$pass"); } } - return unless defined $info; + return undef unless defined $info; $info =~ s/:.*//; uri_unescape($info); } @@ -43,8 +43,8 @@ sub password $self->userinfo("$user:$new"); } } - return unless defined $info; - return unless $info =~ s/^[^:]*://; + return undef unless defined $info; + return undef unless $info =~ s/^[^:]*://; uri_unescape($info); } |