Skip to content

Instantly share code, notes, and snippets.

@dex4er
Created December 18, 2011 19:51
Show Gist options
  • Save dex4er/1494276 to your computer and use it in GitHub Desktop.
Save dex4er/1494276 to your computer and use it in GitHub Desktop.
#!/usr/bin/perl
use HTTP::Proxy;
use HTTP::Proxy::BodyFilter::simple;
my $proxy = HTTP::Proxy->new;
$proxy->port(8888);
$proxy->push_filter(
mime => '*/*',
response => HTTP::Proxy::BodyFilter::simple->new(
sub { ${$_[1]} =~ s/.* has not purchased the game!/Valid/ }
),
);
$proxy->start;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment