Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision a11973c7

Von Sven Schöling vor fast 13 Jahren hinzugefügt

  • ID a11973c72d2d2e3fb3943fd21dcbc7668ccf499f
  • Vorgänger ec52855f
  • Nachfolger 0dc65e85

Debugcode.

Unterschiede anzeigen:

SL/Request.pm
199 199
  if ($ENV{CONTENT_LENGTH}) {
200 200
    my $content;
201 201
    read STDIN, $content, $ENV{CONTENT_LENGTH};
202
    open my $fh, '>:raw', '/tmp/blubb.bin' or die;
203
    print $fh $content;
204
    close $fh;
205 202
    if ($ENV{'CONTENT_TYPE'} && $ENV{'CONTENT_TYPE'} =~ /multipart\/form-data/) {
206 203
      # multipart formdata can bring it's own encoding, so give it both
207 204
      # and let ti decide on it's own

Auch abrufbar als: Unified diff