diff options
Diffstat (limited to 'sbolint')
-rwxr-xr-x | sbolint | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1033,6 +1033,7 @@ sub check_url { return 0 if $_[0] =~ /\s/; # ...it contains a space, return 0 if $_[0] !~ /\./; # ...it has no dots, or return 0 if $_[0] !~ /\//; # ...it has no slashes, or + return 0 if $_[0] =~ /\$/; # ...it contains a dollar sign, or return ($_[0] =~ /^(?:ftp|https?):\/\//); # ...it doesn't have a known protocol, # ...which doesn't necessarily mean it's a good URL either. } |