a few more examples

mojolicious · Apr 21, 2013 · 144cead · 144cead
1 parent 44857dd
commit 144cead
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/lib/Mojo/URL.pm b/lib/Mojo/URL.pm
@@ -83,7 +83,7 @@ sub parse {
 
   # URL
   my $proto = $self->scheme($1)->protocol;
-  unless ($proto && !grep { $proto eq $_ } qw(http https ws wss)) {
+  if (!$proto || grep { $proto eq $_ } qw(http https ws wss)) {
     $self->authority($2);
     $self->path->parse($3);
     $self->query($4)->fragment($5);
@@ -368,6 +368,12 @@ Check if URL is absolute.
 Parse relative or absolute URL for the C<http>, C<https>, C<ws> as well as
 C<wss> schemes and preserve scheme data for all unknown ones.
 
+  # "/test/123"
+  $url->parse('/test/123?foo=bar')->path;
+
+  # "example.com"
+  $url->parse('http://example.com/test/123?foo=bar')->host;
+
   # "mailto:sri@example.com"
   $url->parse('mailto:sri@example.com')->to_string;