use JIRA::REST;
 
my $jira = JIRA::REST->new({
    url      => 'https://jira.example.net',
    username => 'myuser',
    password => 'mypass',
});

# File a bug
my $issue = $jira->POST('/issue', undef, {
    fields => {
        project   => { key => 'PRJ' },
        issuetype => { name => 'Bug' },
        summary   => 'Cannot login',
        description => 'Bla bla bla',
    },
});
 
# Get issue
$issue = $jira->GET("/issue/TST-101");
 
# Iterate on issues
my $search = $jira->POST('/search', undef, {
    jql        => 'project = "TST" and status = "open"',
    startAt    => 0,
    maxResults => 16,
    fields     => [ qw/summary status assignee/ ],
});