use URI::Escape;
print(
    "authenticate.cgi?destination=",
    uri_escape( $query->url( -query => 1 ) ),
);