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