Select Code to Download

        my $delstatus = 'checking for: [' . $data->{'host_name'} .
            '][' . $data->{'service_description'} . '] for last output
+ entry.';
...
                ' ERRSTR [' . database('current')->errstr . ']';
        $delstatus .= '/found [' . (scalar @last_records) . '] to dele
+te';
        debug("QUICK SELECT STATUS: --=> $delstatus <=--");

Use of uninitialized value in concatenation (.) or string at /home/svc
+anagios/n2s/bin/../lib/NagiosToServiceNow/json.pm line 699.
Use of uninitialized value in concatenation (.) or string at /home/svc
+anagios/n2s/bin/../lib/NagiosToServiceNow/json.pm line 699.[NagiosToS
+erviceNow::json:51461] debug @2018-09-22 15:41:00> QUICK SELECT STATU
+S: --=> checking for: [targethostname][targetchecktext] for last outp
+ut entry./error from quick_select call; ERR []; ERRSTR []/found [0] t
+o delete <=-- in /home/svcanagios/n2s/bin/../lib/NagiosToServiceNow/j
+son.pm l. 709