--- a/branches/0.71/lib/SOAP/Transport/HTTP.pm
+++ b/branches/0.71/lib/SOAP/Transport/HTTP.pm
@@ -4,7 +4,7 @@
 # SOAP::Lite is free software; you can redistribute it
 # and/or modify it under the same terms as Perl itself.
 #
-# $Id: HTTP.pm 386 2011-08-18 19:48:31Z kutterma $
+# $Id: HTTP.pm 401 2012-03-10 17:18:32Z kutterma $
 #
 # ======================================================================
 
@@ -691,7 +691,13 @@
         while ( my $r = $c->get_request ) {
             $self->request($r);
             $self->SUPER::handle;
-            $c->send_response( $self->response );
+            eval {
+                local $SIG{PIPE} = sub {die "SIGPIPE"};
+                $c->send_response( $self->response );
+            };
+            if ($@ && $@ !~ /^SIGPIPE/) {
+                die $@;
+            }
         }
 
 # replaced ->close, thanks to Sean Meisner <Sean.Meisner@VerizonWireless.com>