LOWP :: UserAgent中的PAR :: Packer和HTTPS

Question

I have a simple Perl which uses LWP::UserAgent to connect to HTTPS and decode JSON result:

my $self = shift;
my $text = shift;
my $ua = new LWP::UserAgent;
my $response = $ua -> get ($self -> getReqLink($text));
$response = parse_json($response -> decoded_content);
return decode('utf-8', $response -> {text} -> [0]);

It works fine if I run Perl script. I packed it with pp:

pp -c -o maker.exe maker.pl

And I get and error if I run maker.exe:

JSON error at line 1, byte 1/170: Unexpected character 'S' parsing initial state: expecting whitespace: '\n', '\r', '\t', ' ' or start of an array or object: '{', '[' at Translation/YandexTranslator.pm line 30.

What's wrong?

Answer 1

1. Always use -x when you run PP. It will add run-time dependencies and generate a more reliable executable for you. In my experience, this option can fix many mysterious errors.
2. Add use warnings and use strict at the top of your code.See if there is any potential problem.