xpert has asked for the wisdom of the Perl Monks concerning the following question:
I want to send 2 different files to an API. File-1 contains XML data and File-2 is a MS word document. I am using following code:
my $signedURL = ‘signedURL'; my $file = ‘C:\some.docx'; my $text = read_file( ‘C:\some.xml’ ) ; my $ua = LWP::UserAgent->new; my $req = $ua->request(PUT $signedURL, Content_Type => ‘form-data’, Content => [ XML => $text, Upload => [“$file”] ] ); print “\nRESPONSE — \n” . $req->as_string; # Check the outcome of the response if ($req->is_success) { print $req->content; } else { print “\n in else not success\n”; }
It is generating following error:
Not a SCALAR reference at C:/Dwimperl/perl/vendor/lib/HTTP/Message.pm +line 156. at C:/Dwimperl/perl/vendor/lib/HTTP/Message.pm line 156 HTTP::Message::add_content(‘HTTP::Request=HASH(0x34f4f54)’, ‘ARRAY(0x3 +4e 84bc)’) called at C:/Dwimperl/perl/vendor/lib/HTTP/Request/Common.pm l +ine 108 HTTP::Request::Common::_simple_req(undef, undef, undef, undef) called +at C:/Dwimperl/perl/vendor/lib/HTTP/Request/Common.pm line 22 HTTP::Request::Common::PUT(‘http://api.aspose.com/v1.1/words/executeMa +il Merge?withRegions…’, ‘Content_Type’, ‘form-data’, ‘Content’, ‘ARRAY(0x +34e84bc) ‘) called at word_multipart2.pl line 50 Press any key to continue . . .
Please, guide
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: PUT a Multipart request in PERL
by Anonymous Monk on Apr 02, 2015 at 08:44 UTC | |
by xpert (Initiate) on Apr 06, 2015 at 18:36 UTC | |
by Anonymous Monk on Apr 06, 2015 at 23:49 UTC | |
by xpert (Initiate) on Apr 07, 2015 at 04:44 UTC | |
by Anonymous Monk on Apr 07, 2015 at 07:28 UTC | |
Re: PUT a Multipart request in PERL ( lwp-mechanize-put-multipart-form.pl )
by Anonymous Monk on Apr 13, 2015 at 09:08 UTC |
Back to
Seekers of Perl Wisdom