Lines 71-77
my $i = 0;
Link Here
|
71 |
my $value = ''; |
71 |
my $value = ''; |
72 |
my $authorized = $result->{'summary'}->{authorized}; |
72 |
my $authorized = $result->{'summary'}->{authorized}; |
73 |
foreach my $heading (@$authorized) { |
73 |
foreach my $heading (@$authorized) { |
74 |
$value .= $heading . ' '; |
74 |
$value .= $heading->{heading} . ' '; |
75 |
} |
75 |
} |
76 |
$value = "{\"summary\":\"" . $value . "\"" . "}"; |
76 |
$value = "{\"summary\":\"" . $value . "\"" . "}"; |
77 |
print nsb_clean($value) . "\n"; |
77 |
print nsb_clean($value) . "\n"; |
78 |
- |
|
|