90:       $sv_index = $#carrierLOG + 1 if ($sv_index == 0);
91:       $carrierLOG[$sv_index] = "$gs02;$gs04;;$whoami;$chksum;$file";

##</code><code>##

91:       $carrierLOG[$sv_index] = "$gs02;$gs04;;$whoami;$chksum;$file";

  DB<4> x $carrierLOG[$sv_index]
0  'EMDEON;20101021;;psg0977;58788;LM837P.20101021052601 '

  DB<5> s
Attempt to free unreferenced scalar: SV 0x400f465c, Perl interpreter: 0x400146f0
 at /rims/scripts/chk837.pl line 103.
 at /rims/scripts/chk837.pl line 103