Hi all,

I have a script to retrive some company data from Companies House. I have a list of company numbers, the script goes through each one in turn and collects some data. There are several hundred numbers to go through and at random points I get the following error and the script dies:

Can't locate object method "json_content" via package "HTTP::Headers" at /usr/local/share/perl5/HTTP/Message.pm line 652.

This does not occur at any given company number, can happen on the 10th one or 255th one, no pattern there. The part of the code where the error occurs:

my $ua = LWP::UserAgent::JSON->new;
my $request = HTTP::Request::JSON->new( GET => "https://api.companiesh
+ouse.gov.uk/company/$cn");
$request->authorization_basic('password_here'); # actual password remo
+ved
my $response = $ua->request($request);
my $json = $response->json_content;

[download]

I thought that maybe the response from companies house was broken at certain times, or it was giving an error and that was the reason. But when I dumped the return for $response, there appears to be no issue just before the script breaks. Not really sure what else to try, so any help would be greatly appreaciated.

~Krill

In reply to Can't locate object method "json_content" by Krillianaire

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.