Commit 9524b75e5b634b15ddff2a4a00025c1911ba2add
- Diff rendering mode:
- inline
- side by side
lib/LWP/Protocol.pm
(1 / 0)
|   | |||
| 102 | 102 | } | |
| 103 | 103 | elsif (!ref($arg) && length($arg)) { | |
| 104 | 104 | open(my $fh, ">", $arg) || die "Can't write to '$arg': $!"; | |
| 105 | binmode($fh); | ||
| 105 | 106 | push(@{$response->{handlers}{response_data}}, sub { | |
| 106 | 107 | print $fh $_[3] || die "Can't write to '$arg': $!"; | |
| 107 | 108 | 1; |

