$u5 = URI->new("HTTP://WWW.perl.com:80")->canonical;