Jag har lekt med en Proxy klient / server app som kommer att lyssna på kundens system på tex port 7070. Användarens webbläsare proxyinställning är konfigurerad för "localhost" port "7070".
När denna fullmakt app får en begäran om en URL man skulle hämta adressen och visa den i webbläsaren.

Jag har redan gjort lyssnaren delen av skript (det var lätt) men hur kan jag då ringa och få den URL som användaren kommer att ansöka om sin webbläsare och visa den till webbläsaren som agerar som en proxy.

Här är koden hittills. Jag är helt fast .. någon hjälp är mycket uppskattad

#!/usr/bin/perl
use IO::Socket;

my $sock= new IO::Socket::INET (
                                LocalHost=> 'localhost',
                                LocalPort=> '7070',
                                Proto=> 'tcp',
                                Listen=> 1,
                                Reuse=> 1,
                                Type=> SOCK_STREAM,
                                );
die "Could not create socket:  $!\n" unless $sock;

my $new_sock = $sock->accept();
        while (<$new_sock>) {
                print $_;
        }
        close ($sock);