2009-09-04から1日間の記事一覧
これで、Firefoxはたまにしか必要なくなった。 #!/usr/bin/perl use HTTP::Proxy; use strict; my $proxy = HTTP::Proxy->new(port => 8080); $proxy->push_filter(request => MyFilter->new($ARGV[0])); $proxy->start; package MyFilter; use base qw/HTTP…
これで、Firefoxはたまにしか必要なくなった。 #!/usr/bin/perl use HTTP::Proxy; use strict; my $proxy = HTTP::Proxy->new(port => 8080); $proxy->push_filter(request => MyFilter->new($ARGV[0])); $proxy->start; package MyFilter; use base qw/HTTP…