sub new_c {
my ($class, $url, $cookie) = @_;
my $self = { url => $url, auth_url => $auth_url };
bless $self, $class;
$self->{_ua} = LWP::UserAgent->new();
$self->{_ua}->cookie_jar({cookies => $cookie} );
return $self;
}
####
$VAR1 = bless( {
'_ua' => bless( {
'cookie_jar' => 'JSESSIONID=F97AC6F5AD33D54D0C06F4CBF0230C43',
}, 'LWP::UserAgent' ),
}
####
garbage after JSON object, at character offset 4 (before "Can't locate object ..
.") at C:/strawberry/perl/site/lib//JIRA/Client/Automated.pm line 385.
request GET /rest/api/latest/issue/JIML-3044: at main.pl line 30
response 401 Unauthorized: {"errorMessages":["You do not have the permission to
see the specified issue.","Login Required"],"errors":{}} at main.pl line 30
Unable to GET /rest/api/latest/issue/JIML-3044: 401 Unauthorized{
errorMessages => [
"You do not have the permission to see the specified issue.",
"Login Required",
],
errors => {},
}