On Thu, 21 Jul 2011 23:23:20 +0100, Adam D. Barratt wrote: > > I'm not sure if this is a problem of debbugs SOAP interface, of > > SOAP::Lite or just a user error; but the following simplified test > > script throws an error in get_bug_log() and leaves $log undef: > Hmmm. Does the problem happen with all bugs, or just some?
To be honest, I haven't tried with all bugs :)
Just with 2, where it failed; sorry for not providing the bug
numbers in the first place..
> $ perl bug.pl 123456
> ARRAY(0x124e6a8)
>
> Data::Dumper()ing $log also looks sane.
Yup, 123456 works.
Hm.
611368 is the one I originally tried, and it fails with
"Can't call method "as_string" on an undefined value at
/usr/share/perl5/SOAP/Packager.pm line 188."
When I add "+trace" to the SOAP::Lite import [attached], one
difference I see (or actually Ansgar saw yesterday) is:
Content-Type: multipart/related; type="text/xml"; start="<main_envelope>";
boundary="===============9023485512984783153=="
With 123456 this is
Content-Type: text/xml; charset=utf-8
This Content-Type might be related, since the error in
/usr/share/perl5/SOAP/Packager.pm comes in the section after dealing
with mime-types.
Cheers,
gregor
--
.''`. Homepage: http://info.comodo.priv.at/ - PGP/GPG key ID: 0x8649AA06
: :' : Debian GNU/Linux user, admin, & developer - http://www.debian.org/
`. `' Member of VIBE!AT & SPI, fellow of Free Software Foundation Europe
`- BOFH excuse #287: Telecommunications is downshifting.
#!/usr/bin/perl
use SOAP::Lite +trace;
use strict;
use warnings;
my $bug = $ARGV[0];
die 'Err: Provide valid bug number' if !$bug;
# retrieve bug info
my $soap = SOAP::Lite ->
uri('Debbugs/SOAP') ->
proxy('http://bugs.debian.org/cgi-bin/soap.cgi');
# my $status = $soap -> get_status($bug) -> result() -> {$bug};
my $log = $soap -> get_bug_log($bug) -> result();
use Data::Dumper;
print Dumper(\$log);
signature.asc
Description: Digital signature
