|
Lines 69-75
my $i = 0;
Link Here
|
| 69 |
foreach my $result (@$results) { |
69 |
foreach my $result (@$results) { |
| 70 |
if($i > 0){ print ","; } |
70 |
if($i > 0){ print ","; } |
| 71 |
my $value = ''; |
71 |
my $value = ''; |
| 72 |
my $authorized = $result->{'summary'}->{authorized}; |
72 |
my $authorized = $result->{'summary'}->{authorized}->{heading}; |
| 73 |
foreach my $heading (@$authorized) { |
73 |
foreach my $heading (@$authorized) { |
| 74 |
$value .= $heading . ' '; |
74 |
$value .= $heading . ' '; |
| 75 |
} |
75 |
} |
| 76 |
- |
|
|