use URI::URL;
 print url("foo/test.html")->abs("http://www.sun.com/");'
[download]

output:
http://www.sun.com/foo/test.html

make more sense now?