Ah - I think I see. Try:

my $jira=JIRA::Client->new('http://example.com/jira',$user,$pw);

my %custom_fields = $jira->get_custom_fields();
my @custom_field_names = keys %custom_fields;
# if the above is filled with IDs instead of names, use 'values' inste
+ad of 'keys'

while (my $issue = $jira->next_issue()) {

  print 'Priority: ', $issue->getPriority, "\n";
  print 'Status  : ', $issue->getStatus,   "\n";

  my @custom_field_values = $jira->get_issue_custom_field_values($issu
+e, @custom_field_names);

  for (my $i=0; $i < @custom_field_names; $i++) {
    print "Custom Field $custom_field_names[$i] : $custom_field_values
+[$i];
  }
  print '-'x40,$/;
}
[download]

Thanks for the response keszler. I initially got the error stating that the setFilterIterator should be called before calling nextIssue. So, I included the set_filter_iterator on the filterID. The code looks like this:

15 my $jira=JIRA::Client->new('http://example.com/jira',$user,$pw);
16 $jira->set_filter_iterator($filterID);
17
18 my %custom_fields = $jira->get_custom_fields();
19 my @custom_field_names = keys %custom_fields;
20 # if the above is filled with IDs instead of names, use 'values' in
+stead of 'keys'
21 
22 
23 while (my $issue = $jira->next_issue()) {
24
25   print 'Priority: ', $issue->getPriority, "\n";
26   print 'Status  : ', $issue->getStatus,   "\n";
27
28   my @custom_field_values = $jira->get_issue_custom_field_values($i
+ssue, @custom_field_names);
29 
30   for (my $i=0; $i < @custom_field_names; $i++) {
31     print "Custom Field $custom_field_names[$i] : $custom_field_val
+ues[$i];
32   }
33   print '-'x40,$/;
34 }
[download]

So now I am getting the following 2 errors when running the above code: 1) Reference found where even-sized list expected at test.pl line 18. 2) Can't locate object method "getPriority" via package "RemoteIssue" at test.pl line 25. For error #1, this might have been caused because the hash "customFieldValues" is using a "[]" instead of a "()" to assign the other sub-blessed hashes. Not quite sure on that though. For error #2, not sure why this is being generated since the "RemoteIssue" e.g. status, is part of $VAR1; which should assign a priority of 2 to all the sub-hashes.

Looks like I guessed wrong on get_custom_fields returning a hash instead of a hash reference.

18 my $custom_fields_ref = $jira->get_custom_fields();
19 my @custom_field_names = keys %{$custom_fields_ref};
[download]

should fix that.

I had found a reference to http://docs.atlassian.com/rpc-jira-plugin/4.1-1/com/atlassian/jira/rpc/soap/beans/RemoteIssue.html, with a statement that the Perl module replicated the Java methods. One of these might work:

$issue->getpriority
$issue->get_priority
$jira->getpriority($issue)
$jira->get_priority($issue)
$issue->{priority}  # this may work, but is less desirable than using 
+a method
[download]