Re: Parse an URL


Perl: the Markov chain saw
	PerlMonks

Re: Parse an URL

by tachyon (Chancellor)

on Apr 09, 2002 at 12:15 UTC ( #157701=note: print w/ replies, xml )

Need Help??

in reply to Parse an URL

You will have to do your own work and learn about pattern matching regexes then read the relevant RFCs to determine what constitutes a valid URL. This snippet basically shows you how you do it but the only valid URL is http://perlmonks.org

<head>
<script>
function check(url) {
    if (url.match("(http|ftp)://perlmonks.org") ) {
      return 1;
    } else {
        alert(url+" is not a valid URL\nPlease enter a valid one")
        my_form.url.value = 'http://';
      return 0;
    }
}

function check_fields(form) {
    // check your form fields here
    alert("You need to revalidate server side! use Perl;");
  return 1;
}
</script>
</head>

<body>
<form name="my_form" method=GET action="/do/this/stuff.cgi" onSubmit="
+check_fields(my_form)">
<p><input type="text" name="url" size=25 maxlength=100 value="http://"
+ onMouseOut="check(url.value)">
<p><input type="submit" value="Stumbit">
</form>
</body>
</html>
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

Comment on Re: Parse an URL Download Code
Re^2: Parse an URL by Anonymous Monk on Sep 15, 2009 at 09:25 UTC
There is an excellent perl module for URI-parsing. Imho having everyone invent his own URL-parser is unnecessary work. You might take a look at: http://search.cpan.org/~gaas/URI-1.40/URI/Split.pm	[reply]

In Section Seekers of Perl Wisdom

Node Status^?

node history
Node Type: note [id://157701]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others musing on the Monastery: (16)

As of 2013-05-24 17:59 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

The best material for plates (tableware) is:

Results (511 votes), past polls