view release on metacpan or  search on metacpan

ChangeLog  view on Meta::CPAN

	o  Corrected bug handling tags with whitespace around
	   edges of quotes.
	o  Made release 0.13.
	
2001-03-02	Christian Gilmore <cgilmore@tivoli.com>

	o  Corrected mishandling of URL-shrinking in rewrite_url.
	o  Ensured that parsing loop closes in the case of final
	   missing end tag.
	o  Now unescape headers for proxy request. Bug reported and
	   patched by Eric Kolve.
	o  Removed use of deprecated header_in and header_out in favor
	   of current headers_in and headers_out.
	o  Set-Cookie path is now rewritten. Feature requested by Eric
 	   Kolve.
	o  Made release 0.12.

2001-01-14	Christian Gilmore <cgilmore@tivoli.com>

	o  Added 'base' as an element of the LINK_ELEMENT hash. Bug

ProxyRewrite.pm  view on Meta::CPAN

# Required libraries
use strict;
use Apache;
use Apache::Constants qw(OK AUTH_REQUIRED DECLINED DONE);
use Apache::Log;
use Apache::URI;
use LWP::UserAgent;
use Socket;
use URI::Escape qw(uri_unescape);


# Global variables
$Apache::ProxyRewrite::VERSION = '0.17';
$Apache::ProxyRewrite::PRODUCT = 'ProxyRewrite/' .
  $Apache::ProxyRewrite::VERSION;
my %LINK_ELEMENTS =
( # These represent all the possible valid tags that have links in them
 'a'       => 'href',
 'applet'  => {

ProxyRewrite.pm  view on Meta::CPAN

    # HACK to force no Keep-Alives on the connection between proxy
    # and remote server
    $r->log->debug("fetch: IN $k: $v");
    if ($k =~ /Connection/) {
      $v = "Close";
    } elsif ($k =~ /Host/) {
      ($v) = ($remote_location =~ m!://([^/]+)!);
    } elsif ($k =~ /User-Agent/) {
      $client_agent = $v;
    }
    $v = uri_unescape($v);
    $request->header($k,$v);	
    $r->log->debug("fetch: IN-MOD $k: $v");
  }

  # If we have authorization information and it isn't already filled in
  if ($auth_info && !$request->authorization()) {
    $request->authorization($auth_info);
  }

  if ($r->method eq "POST") {