test.p6

grammar url {
    regex TOP         {  <anyprotocol> '://' <base> [ ['/' <term>]+ ]? '/'?  }
    token anyprotocol {   <[ a..z A..Z ]> <[ a..z A..Z 0..9 . + - ]>+  }
    token protocol    {:i [http|https|ftp|git|ssh]                     }
    token baseascii   {   [ <[a..z A..Z 0..9 \- . ]> ]+                }
    token base        {   [ <:Number + :Letter + [ . - ]> ]+           }
    token protected   {   <[ $ + ! * ( ) , . ; ? @ = % & # " ' ]>      }
    token allowed     {   \S                                           }
    regex term        {   <allowed>+ <!after <protected>>              }
#    token after       {   '/' <term>                                   }
}
say url.parse("https://google.com");
say url.parse("https://google.com/something");