User since: |
Apr 07, 2003 at 04:27 UTC
(22 years ago) |
Last here: |
Apr 27, 2012 at 20:21 UTC
(13 years ago) |
Experience: |
655
|
Level: | Pilgrim (8) |
Writeups: |
125
|
Location: | n/a |
User's localtime: |
Mar 26, 2025 at 08:04 UTC
|
Scratchpad: |
View
|
For this user: | Search nodes |
|
Why does the below code fail when the url is "http://www.go.com"? Infact, every URL I try to put in there errors out.
if ($url !~ /^http\:/i || $url !~ /^ftp:/i || $url !~ /^file:/i || $u
+rl !~ /^mailto:/i || $url !~ /^telnet:/i)
{
print header;
print "<html><head><title>Malformed URL</title>";
print qq(<meta http-equiv="refresh" content="4;url=$redirect_url"><
+/head><body>);
print "<b>Malformed URL</b><p>You will be redirected to our main pa
+ge in 4 seconds. Your url was: $url";
print "</body></html>";
exit;
}
|