Mon Jul 01 16:26:46.898774 2019 cgi:error pid 6060:tid 1144 client ::1:58540 AH01215: Can't write to 'localhost/choo/tcimages/176801_1.JPG-14660': No such file or directory at C:/Strawberry/perl/vendor/lib/LWP/Protocol.pm line 114. at C:/Strawberry/perl/vendor/lib/LWP/UserAgent.pm line 982.\r: C:/Apache24/htdocs/choo/cgi-bin/ua/main.pl
I found protocol.pm but have no idea how to deal with this. As far as I can tell line 114 is the die statement:
This can't be moved to Try::Tiny due to the closures within causing # leaks on any version of Perl prior to 5.18. # https://perl5.git.perl.org/perl.git/commitdiff/a0d2bbd5c my $error = do { #catch local $@; local $\; # protect the print below from surprises eval { # try if (!defined($arg) || !$response->is_success) { $response->{default_add_content} = 1; } elsif (!ref($arg) && length($arg)) { open(my $fh, ">", $arg) or die "Can't write to '$arg': + $!"; binmode($fh); push(@{$response->{handlers}{response_data}}, { callback => sub { print $fh $_[3] or die "Can't write to '$arg': + $!"; 1;
I have no idea what to do here. I hope I presented this so it makes some sense to someone.
Thanks for any help.
In reply to write to .jpg error problem by traincity
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |