Perl
Perl
Parse a URL into its Component Parts
See more HTTP Examples
Demonstrates how to parse a URL into it's component parts.Chilkat Perl Downloads
use chilkat();
$success = 0;
$url = chilkat::CkUrl->new();
$urlStr = "https://www.amazon.com/Anarchy-State-Utopia-Robert-Nozick/dp/0465051006/ref=sr_1_1?s=books&ie=UTF8&qid=1430344305&sr=1-1&keywords=nozick#frag123";
$success = $url->ParseUrl($urlStr);
# Assume success..
print "URL: " . $urlStr . "\r\n";
print "Host: " . $url->host() . "\r\n";
print "Port: " . $url->get_Port() . "\r\n";
print "HostType: " . $url->hostType() . "\r\n";
print "Ssl: " . $url->get_Ssl() . "\r\n";
print "Path: " . $url->path() . "\r\n";
print "Query: " . $url->query() . "\r\n";
print "Frag: " . $url->frag() . "\r\n";
print "----" . "\r\n";
$urlStr = 'http://matt:secret@www.chilkatsoft.com:8080/somepath.asp?test=123&size=2';
$success = $url->ParseUrl($urlStr);
# Assume success..
print "URL: " . $urlStr . "\r\n";
print "Host: " . $url->host() . "\r\n";
print "Port: " . $url->get_Port() . "\r\n";
print "HostType: " . $url->hostType() . "\r\n";
print "Ssl: " . $url->get_Ssl() . "\r\n";
print "Login: " . $url->login() . "\r\n";
print "Password: " . $url->password() . "\r\n";
print "Path: " . $url->path() . "\r\n";
print "Query: " . $url->query() . "\r\n";
print "Frag: " . $url->frag() . "\r\n";