Re^4: Weather RSS image

[ikegami]

Huh? getstore calls binmode:

    elsif (!ref($arg)) {
        # filename
        open(OUT, ">$arg") or
            return HTTP::Response->new(&HTTP::Status::RC_INTERNAL_SERV
+ER_ERROR,
                "Cannot write to '$arg': $!");
        binmode(OUT);

source

Call stack:

• LWP::Protocol::collect
• LWP::Protocol::http::request
• LWP::UserAgent::send_request
• LWP::UserAgent::simple_request
• LWP::UserAgent::request
• LWP::Simple::getstore

It's not a recent addition either. The version of libwww-perl packaged with ActiveState Perl v5.6.1 does the same thing.

I've successfully downloaded all the images on a Windows system (where binmode would matter) using getstore and ActiveState Perl v5.6.1.