Changes to query escaper

Aaron Sherman (ajs@openmarket.com)
Thu, 12 Oct 1995 14:14:41 -0400


The following is what I did to URL::URI::_generic::_esc_query to get
it to work for my test case. However, there did not seem to be any
user-configurable way for me to make this happen (without changing the
escape-behavior of EVERY part of the URL) other than redefining the
function. Should there be?

Also, should I have been able to "push(@unsafe,'/:')", which seemed
intuitive, but did not work, because uri_escape throws away the rest
of its arguments?

sub _esc_query {
    my($self, $text, @unsafe) = @_;
    # RFC1630
    $text =~ s/ /+/g;
    # / and : are reserved URI characters, so must be escaped in a query
    # -ajs@ajs.com
    $unsafe[0] .= '/:';
    my $text = $self->escape($text, @unsafe);
}


--
Aaron Sherman <ajs@ajs.com>		B4 f w+ c kv s+(--)v r p
I-Kinetics, Inc.			Pager: (508)545-0584
1 NE Executive Park			Fax:   (617)270-4979
Burlington, MA 01803-5005		WWW:   http://ajs.com/~ajs/
		ajs@ajs.com or ajs@openmarket.com
		      "I speak for no one."