c:\test>perl -MURI -E"my $u=new URI('http://dspace.mit.edu/handle/1721.1/53720'); say $u->authority"
dspace.mit.edu

c:\test>perl -MURI -E"my $u=new URI('http://dspace.mit.edu/handle/1721.1/53720'); say $u->path"
/handle/1721.1/53720

c:\test>perl -MURI -E"my $u=new URI('http://dspace.mit.edu/handle/1721.1/53720'); say $u->fragment"


c:\test>perl -MURI -E"my $u=new URI('http://dspace.mit.edu/handle/1721.1/53720'); say $u->opaque"
//dspace.mit.edu/handle/1721.1/53720

c:\test>perl -MURI -E"my $u=new URI('http://dspace.mit.edu/handle/1721.1/53720'); say $u->canonical"
http://dspace.mit.edu/handle/1721.1/53720