Re: ha thee thee pee oh kee plus logging van het request

[Geert Stappers <stappers@stappers.nl>]

On Tue, Aug 24, 2021 at 11:53:19PM +0200, Martijn van de Streek wrote:
> Geert Stappers schreef op di 24-08-2021 om 22:53 [+0200]:
> > Wat ik zoek is software die elk HTTP verzoek in bestand zet
> > en daarna "200 OK" antwoordt.  De opgeslagen bestandjes
> > kan ik dan met elkaar vergelijken. Bestandje bevat de HTTP headers
> > en message body.
> > 
> > Ik weet dat er een bos (een oerwoud?) aan "mock servers" is.
> > Met `apt search mock` komt er (te?) veel boven.
> > 
> > Welke software zou ik nader moeten bekijken?
> > Wat hebben jullie aan tips / advies  voor situatie als deze?
> 
> Ik heb hier zelf een (Perl-)scriptje voor gebakken.

Helemaal fantastisch.

 
> Installeer libhttp-daemon-perl, en voer dit scriptje uit ("perl
> scriptje.pl" of "chmod 755 scriptje.pl; ./scriptje.pl")
> 
> Het script vertelt je zelf z'n URL en zodra je je requests doet worden
> je requests gelogd op stdout.
> 
> -Martijn
> 
> ------- ✂ Hier afknippen ✂ -------
> #!/usr/bin/perl
> use HTTP::Daemon;
> use HTTP::Response;
>  
> my $d = HTTP::Daemon->new || die;
> print "Please contact me at: <URL:", $d->url, ">\n";
> 
> my $res = HTTP::Response->new(
>     200,
>     "OK",
>     ["Content-Type", "text/plain"],
>     "Your request has been logged."
> );
> 
> while (my $c = $d->accept) {
>     while (my $r = $c->get_request) {
>         print "------ Request start ------\n";
>         print $r->as_string;
>         print "------ Request end ------\n";
>         $c->send_response($res);
>     }
>     $c->close;
>     undef($c);
> }
> ------- ✂ Hier afknippen ✂ -------
> 

Mijn bevindingen worden nog teruggemeldt.

 
Groeten
Geert Stappers
-- 
Silence is hard to parse