Six Degrees
body<=
{user} : ""));
my $to_user = LJ::canonical_username($GET{'to'});
my $ret;
$ret .= qq{};
if ($from_user ne "" && $to_user ne "") {
my $fu = LJ::load_user($from_user);
my $tu = LJ::load_user($to_user);
my @path = LJ::SixDegrees::find_path($fu, $tu, 3);
$ret .= "Path:";
if (@path) {
$ret .= join(" > ", map { LJ::ljuser($_) } @path);
} else {
$ret .= "(none found)";
}
}
return $ret;
}
_code?>
<=body
page?>