Select Code to Download

use LWP::UserAgent;
use HTTP::Request;
...
$request->authorization_basic($user, $password);
my $answer = $ck->request ($request);
my $cookie = $answer->header('Set-Cookie');

my $ua=LWP::UserAgent->new( keep_alive => 1 );
my $key = 'existing_issue_code'; #this is just for test. You can use a
+ny issue you get from web JIRA
$getline=$url . '/rest/api/latest/issue/' . $key;
$request = new HTTP::Request (GET => $getline, HTTP::Headers->new('Coo
+kie'=> $cookie ) );
$answer = $ua->request ($request);