Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
use HTTP::Proxy;
use HTTP::Proxy::BodyFilter::simple;
my $proxy = HTTP::Proxy->new;
mime => '*/*',
response => HTTP::Proxy::BodyFilter::simple->new(
sub { ${$_[1]} =~ s/.* has not purchased the game!/Valid/ }
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment