$$self = uri_join($scheme, $auth, $path, $query, $frag);
}
$path =~ s!\A/+!!;
$$self = uri_join($scheme, $auth, $path, $query, $frag);
}
$path =~ s!\A/+!!;
}
$$self = uri_join($scheme, $auth, $path, $query);
}
}
$$self = uri_join($scheme, $auth, $path, $query);
}