my $line = (<NEW_SOCKET>);
$line =~ m#GET http://(.*)/(.*)#;