foreach my $elem(%{$res})
{
    if (defined($res->{$elem}->{'IssueText'}))
    {
        my $result = $res->{$elem}->{'IssueNo'};
        $result =~ s/\s+$//;        # Delete trailing whitespace
        debug (20,"$result:Current IssueText-\"$result\"\n|);
    }
}