URI->new_abs

技術

そいや、URIモジュール使って2回以上new_absすると、たとえば、

my $u = URI->new('http://b.hatena.ne.jp');

# ひとつ繋げる
$u = URI->new_abs('hakobe932', $u);
print $u, "\n"; # http://b.hatena.ne.jp/hakobe932

# もうひとつ繋げる
$u = URI->new_abs('perl', $u);
print $u, "\n"; # http://b.hatena.ne.jp/hakobe932/perl

すると、

$ perl uriabs
http://b.hatena.ne.jp/hakobe932
http://b.hatena.ne.jp/perl

こうなる。

なんでやねん。