|
... o proxy, che dir si voglia.
#!/usr/bin/env perl
use strict;
use warnings;
use HTTP::Proxy;
use HTTP::Proxy::HeaderFilter::simple;
$|++; # disabilita buffering su STDOUT
my $proxy = HTTP::Proxy->new(@ARGV);
$proxy->push_filter(
request => HTTP::Proxy::HeaderFilter::simple->new(
sub { print {*STDOUT} $_[2]->uri(), "\n" }
)
);
$proxy->start();
Per default si aggancia alla porta 8080. Puntandoci il browser si avrà la stampa di tutte le URI che vengono richieste. Sì, anche quelle dei video di YouTube.
Inviato da polettix il 17.12.07 01:50
 Ti è piaciuto questo articolo? Iscriviti al feed!
| 
Associazione
Documenti
Eventi
Community
Blog
Link
